home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1998-05-26 | 27.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 6d 24 00 00 00 01 | 00 00 00 00 00 00 00 00 |..m$....|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00000210| 3d 20 20 20 33 2e 30 30 | 00 00 00 01 00 00 00 04 |= 3.00|........|
|00000220| 5f 73 65 74 00 00 00 01 | 00 00 00 50 63 73 65 74 |_set....|...Pcset|
|00000230| 63 6f 6d 6d 61 6e 64 0d | 0a 75 6f 6c 64 76 61 6c |command.|.uoldval|
|00000240| 75 65 0d 0a 75 6f 6c 64 | 76 61 6c 75 65 31 0d 0a |ue..uold|value1..|
|00000250| 75 6f 6c 64 76 61 6c 75 | 65 32 0d 0a 6c 65 72 72 |uoldvalu|e2..lerr|
|00000260| 6f 72 0d 0a 6c 6e 6f 72 | 65 73 74 6f 72 65 0d 0a |or..lnor|estore..|
|00000270| 63 68 65 63 6b 76 61 6c | 75 65 0d 0a 00 00 00 01 |checkval|ue......|
|00000280| 00 00 00 06 50 69 78 65 | 6c 73 00 00 00 01 00 00 |....Pixe|ls......|
|00000290| 00 08 5f 72 75 6e 63 6f | 64 65 00 00 00 01 00 00 |.._runco|de......|
|000002a0| 00 06 50 69 78 65 6c 73 | 00 00 00 01 00 00 00 38 |..Pixels|.......8|
|000002b0| 52 75 6e 73 20 61 20 62 | 6c 6f 63 6b 20 6f 66 20 |Runs a b|lock of |
|000002c0| 56 46 50 20 63 6f 64 65 | 20 76 69 61 20 6d 61 63 |VFP code| via mac|
|000002d0| 72 6f 73 20 77 69 74 68 | 6f 75 74 20 63 6f 6d 70 |ros with|out comp|
|000002e0| 69 6c 61 74 69 6f 6e 2e | 00 00 00 01 00 00 00 05 |ilation.|........|
|000002f0| 43 6c 61 73 73 00 00 00 | 01 00 00 00 05 43 6c 61 |Class...|.....Cla|
|00000300| 73 73 00 00 00 01 00 00 | 00 01 31 00 00 00 01 00 |ss......|..1.....|
|00000310| 00 00 07 5f 63 75 73 74 | 6f 6d 00 00 00 01 00 00 |..._cust|om......|
|00000320| 00 04 5f 73 65 74 00 00 | 00 01 00 00 00 0d 5f 73 |.._set..|......_s|
|00000330| 68 65 6c 6c 65 78 65 63 | 75 74 65 00 00 00 01 00 |hellexec|ute.....|
|00000340| 00 00 06 50 69 78 65 6c | 73 00 00 00 01 00 00 00 |...Pixel|s.......|
|00000350| 05 43 6c 61 73 73 00 00 | 00 01 00 00 00 01 31 00 |.Class..|......1.|
|00000360| 00 00 01 00 00 00 07 5f | 63 75 73 74 6f 6d 00 00 |......._|custom..|
|00000370| 00 01 00 00 00 0d 5f 73 | 68 65 6c 6c 65 78 65 63 |......_s|hellexec|
|00000380| 75 74 65 00 00 00 01 00 | 00 00 01 31 00 00 00 01 |ute.....|...1....|
|00000390| 00 00 00 07 5f 63 75 73 | 74 6f 6d 00 00 00 01 00 |...._cus|tom.....|
|000003a0| 00 00 08 5f 72 75 6e 63 | 6f 64 65 00 00 00 01 00 |..._runc|ode.....|
|000003b0| 00 00 33 2a 72 75 6e 63 | 6f 64 65 20 52 75 6e 43 |..3*runc|ode RunC|
|000003c0| 6f 64 65 28 63 43 6f 64 | 65 5b 2c 20 6c 46 69 6c |ode(cCod|e[, lFil|
|000003d0| 65 5d 20 5b 2c 6c 6c 67 | 6e 6f 72 65 45 72 72 6f |e] [,llg|noreErro|
|000003e0| 72 73 5d 29 0d 0a 00 00 | 00 01 00 00 02 2a fe f2 |rs])....|.....*..|
|000003f0| ff 20 02 01 00 00 00 11 | 02 00 00 11 02 00 00 00 |. ......|........|
|00000400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000410| 00 00 00 00 00 02 e4 01 | 00 00 00 25 00 00 00 98 |........|...%....|
|00000420| 01 00 00 00 00 00 00 c8 | 01 00 00 0d 00 00 00 ae |........|........|
|00000430| 01 00 00 00 00 00 00 00 | 00 00 00 fc 03 00 03 00 |........|........|
|00000440| 55 00 00 04 01 0f 00 af | f7 00 00 07 f7 01 00 07 |U.......|........|
|00000450| f7 02 00 fe 0f 00 ae f7 | 03 00 07 f7 04 00 07 f7 |........|........|
|00000460| 05 00 fe 0f 00 25 fc 43 | f7 00 00 a1 fd f9 05 37 |.....%.C|.......7|
|00000470| 00 fe 0a 00 42 fc f9 02 | ff ff fd fe 04 00 1e fe |....B...|........|
|00000480| 0f 00 54 f7 03 00 10 fc | 43 f7 00 00 9b fd fe 2d |..T.....|C......-|
|00000490| 00 54 f7 04 00 10 fc 43 | 43 d9 09 00 74 63 57 6f |.T.....C|C...tcWo|
|000004a0| 72 6b 44 69 72 62 d9 01 | 00 43 10 f2 08 00 43 f7 |rkDirb..|.C....C.|
|000004b0| 01 00 9b f3 03 00 d9 00 | 00 36 fd fe 3d 00 54 f7 |........|.6..=.T.|
|000004c0| 05 00 10 fc 43 43 d9 0b | 00 74 63 4f 70 65 72 61 |....CC..|.tcOpera|
|000004d0| 74 69 6f 6e 62 d9 01 00 | 43 10 f0 07 00 43 f7 02 |tionb...|C....C..|
|000004e0| 00 a1 0a 09 f2 08 00 43 | f7 02 00 9b f3 07 00 d9 |.......C|........|
|000004f0| 04 00 4f 70 65 6e 36 fd | fe 2e 00 7c d1 fb 0c 00 |..Open6.|...|....|
|00000500| 53 68 65 6c 6c 45 78 65 | 63 75 74 65 16 fb 0b 00 |ShellExe|cute....|
|00000510| 53 48 45 4c 4c 33 32 2e | 44 4c 4c d1 07 d6 07 d6 |SHELL32.|DLL.....|
|00000520| 07 d6 07 d6 07 d1 fe 1f | 00 42 fc 43 f8 01 00 00 |........|.B.C....|
|00000530| f7 05 00 00 f7 03 00 d9 | 00 00 00 f7 04 00 f8 01 |........|........|
|00000540| 01 f6 06 00 fd fe 03 00 | 55 09 00 0a 00 54 43 46 |........|U....TCF|
|00000550| 49 4c 45 4e 41 4d 45 09 | 00 54 43 57 4f 52 4b 44 |ILENAME.|.TCWORKD|
|00000560| 49 52 0b 00 54 43 4f 50 | 45 52 41 54 49 4f 4e 0a |IR..TCOP|ERATION.|
|00000570| 00 4c 43 46 49 4c 45 4e | 41 4d 45 09 00 4c 43 57 |.LCFILEN|AME..LCW|
|00000580| 4f 52 4b 44 49 52 0b 00 | 4c 43 4f 50 45 52 41 54 |ORKDIR..|LCOPERAT|
|00000590| 49 4f 4e 0c 00 53 48 45 | 4c 4c 45 58 45 43 55 54 |ION..SHE|LLEXECUT|
|000005a0| 45 07 00 53 48 45 4c 4c | 33 32 03 00 44 4c 4c 0c |E..SHELL|32..DLL.|
|000005b0| 00 73 68 65 6c 6c 65 78 | 65 63 75 74 65 2c 00 00 |.shellex|ecute,..|
|000005c0| 00 00 00 ff ff 31 00 fe | 00 f1 00 f2 00 a1 00 41 |.....1..|.......A|
|000005d0| 00 f1 00 d1 02 d1 03 00 | 01 e1 02 f1 01 32 00 00 |........|.....2..|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|000005f0| 00 00 00 18 00 00 00 30 | 06 00 00 01 00 00 00 00 |.......0|........|
|00000600| 29 00 00 00 11 02 00 00 | 00 00 00 00 00 00 00 00 |).......|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 06 3b |........|.......;|
|00000620| 50 52 4f 43 45 44 55 52 | 45 20 73 68 65 6c 6c 65 |PROCEDUR|E shelle|
|00000630| 78 65 63 75 74 65 0d 0a | 2a 20 57 69 6e 41 70 69 |xecute..|* WinApi|
|00000640| 20 3a 3a 20 53 68 65 6c | 6c 45 78 65 63 75 74 65 | :: Shel|lExecute|
|00000650| 0d 0a 2a 2a 20 20 46 75 | 6e 63 74 69 6f 6e 3a 20 |..** Fu|nction: |
|00000660| 4f 70 65 6e 73 20 61 20 | 66 69 6c 65 20 69 6e 20 |Opens a |file in |
|00000670| 74 68 65 20 61 70 70 6c | 69 63 61 74 69 6f 6e 20 |the appl|ication |
|00000680| 74 68 61 74 20 69 74 27 | 73 0d 0a 2a 2a 20 20 20 |that it'|s..** |
|00000690| 20 20 20 20 20 20 20 20 | 20 61 73 73 6f 63 69 61 | | associa|
|000006a0| 74 65 64 20 77 69 74 68 | 2e 0d 0a 2a 2a 20 20 20 |ted with|...** |
|000006b0| 20 20 20 50 61 73 73 3a | 20 6c 63 46 69 6c 65 4e | Pass:| lcFileN|
|000006c0| 61 6d 65 20 2d 20 20 4e | 61 6d 65 20 6f 66 20 74 |ame - N|ame of t|
|000006d0| 68 65 20 66 69 6c 65 20 | 74 6f 20 6f 70 65 6e 0d |he file |to open.|
|000006e0| 0a 2a 2a 20 20 20 0d 0a | 2a 2a 20 20 52 65 74 75 |.** ..|** Retu|
|000006f0| 72 6e 3a 20 20 20 32 20 | 20 2d 20 42 61 64 20 41 |rn: 2 | - Bad A|
|00000700| 73 73 6f 63 69 61 74 69 | 6f 6e 20 28 65 2e 67 2e |ssociati|on (e.g.|
|00000710| 2c 20 69 6e 76 61 6c 69 | 64 20 55 52 4c 29 0d 0a |, invali|d URL)..|
|00000720| 2a 2a 20 20 20 20 20 20 | 20 20 20 20 20 20 33 31 |** | 31|
|00000730| 20 2d 20 4e 6f 20 61 70 | 70 6c 69 63 61 74 69 6f | - No ap|plicatio|
|00000740| 6e 20 61 73 73 6f 63 69 | 61 74 69 6f 6e 0d 0a 2a |n associ|ation..*|
|00000750| 2a 20 20 20 20 20 20 20 | 20 20 20 20 20 32 39 20 |* | 29 |
|00000760| 2d 20 46 61 69 6c 75 72 | 65 20 74 6f 20 6c 6f 61 |- Failur|e to loa|
|00000770| 64 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 0d 0a 2a |d applic|ation..*|
|00000780| 2a 20 20 20 20 20 20 20 | 20 20 20 20 20 33 30 20 |* | 30 |
|00000790| 2d 20 41 70 70 6c 69 63 | 61 74 69 6f 6e 20 69 73 |- Applic|ation is|
|000007a0| 20 62 75 73 79 20 0d 0a | 2a 2a 0d 0a 2a 2a 20 20 | busy ..|**..** |
|000007b0| 20 20 20 20 20 20 20 20 | 20 20 56 61 6c 75 65 73 | | Values|
|000007c0| 20 6f 76 65 72 20 33 32 | 20 69 6e 64 69 63 61 74 | over 32| indicat|
|000007d0| 65 20 73 75 63 63 65 73 | 73 0d 0a 2a 2a 20 20 20 |e succes|s..** |
|000007e0| 20 20 20 20 20 20 20 20 | 20 61 6e 64 20 72 65 74 | | and ret|
|000007f0| 75 72 6e 20 61 6e 20 69 | 6e 73 74 61 6e 63 65 20 |urn an i|nstance |
|00000800| 68 61 6e 64 6c 65 20 66 | 6f 72 0d 0a 2a 2a 20 20 |handle f|or..** |
|00000810| 20 20 20 20 20 20 20 20 | 20 20 74 68 65 20 61 70 | | the ap|
|00000820| 70 6c 69 63 61 74 69 6f | 6e 20 73 74 61 72 74 65 |plicatio|n starte|
|00000830| 64 20 28 74 68 65 20 62 | 72 6f 77 73 65 72 29 20 |d (the b|rowser) |
|00000840| 0d 0a 4c 50 41 52 41 4d | 45 54 45 52 53 20 74 63 |..LPARAM|ETERS tc|
|00000850| 46 69 6c 65 4e 61 6d 65 | 2c 74 63 57 6f 72 6b 44 |FileName|,tcWorkD|
|00000860| 69 72 2c 74 63 4f 70 65 | 72 61 74 69 6f 6e 0d 0a |ir,tcOpe|ration..|
|00000870| 4c 4f 43 41 4c 20 6c 63 | 46 69 6c 65 4e 61 6d 65 |LOCAL lc|FileName|
|00000880| 2c 6c 63 57 6f 72 6b 44 | 69 72 2c 6c 63 4f 70 65 |,lcWorkD|ir,lcOpe|
|00000890| 72 61 74 69 6f 6e 0d 0a | 0d 0a 49 46 20 45 4d 50 |ration..|..IF EMP|
|000008a0| 54 59 28 74 63 46 69 6c | 65 4e 61 6d 65 29 0d 0a |TY(tcFil|eName)..|
|000008b0| 09 52 45 54 55 52 4e 20 | 2d 31 0d 0a 45 4e 44 49 |.RETURN |-1..ENDI|
|000008c0| 46 0d 0a 6c 63 46 69 6c | 65 4e 61 6d 65 3d 41 4c |F..lcFil|eName=AL|
|000008d0| 4c 54 52 49 4d 28 74 63 | 46 69 6c 65 4e 61 6d 65 |LTRIM(tc|FileName|
|000008e0| 29 0d 0a 6c 63 57 6f 72 | 6b 44 69 72 3d 49 49 46 |)..lcWor|kDir=IIF|
|000008f0| 28 54 59 50 45 28 22 74 | 63 57 6f 72 6b 44 69 72 |(TYPE("t|cWorkDir|
|00000900| 22 29 3d 22 43 22 2c 41 | 4c 4c 54 52 49 4d 28 74 |")="C",A|LLTRIM(t|
|00000910| 63 57 6f 72 6b 44 69 72 | 29 2c 22 22 29 0d 0a 6c |cWorkDir|),"")..l|
|00000920| 63 4f 70 65 72 61 74 69 | 6f 6e 3d 49 49 46 28 54 |cOperati|on=IIF(T|
|00000930| 59 50 45 28 22 74 63 4f | 70 65 72 61 74 69 6f 6e |YPE("tcO|peration|
|00000940| 22 29 3d 22 43 22 20 41 | 4e 44 20 4e 4f 54 20 45 |")="C" A|ND NOT E|
|00000950| 4d 50 54 59 28 74 63 4f | 70 65 72 61 74 69 6f 6e |MPTY(tcO|peration|
|00000960| 29 2c 41 4c 4c 54 52 49 | 4d 28 74 63 4f 70 65 72 |),ALLTRI|M(tcOper|
|00000970| 61 74 69 6f 6e 29 2c 22 | 4f 70 65 6e 22 29 0d 0a |ation),"|Open")..|
|00000980| 0d 0a 2a 2d 2a 20 48 49 | 4e 53 54 41 4e 43 45 20 |..*-* HI|NSTANCE |
|00000990| 53 68 65 6c 6c 45 78 65 | 63 75 74 65 28 68 77 6e |ShellExe|cute(hwn|
|000009a0| 64 2c 20 6c 70 73 7a 4f | 70 2c 20 6c 70 73 7a 46 |d, lpszO|p, lpszF|
|000009b0| 69 6c 65 2c 20 6c 70 73 | 7a 50 61 72 61 6d 73 2c |ile, lps|zParams,|
|000009c0| 20 6c 70 73 7a 44 69 72 | 2c 20 77 53 68 6f 77 43 | lpszDir|, wShowC|
|000009d0| 6d 64 29 0d 0a 2a 2d 2a | 20 0d 0a 2a 2d 2a 20 48 |md)..*-*| ..*-* H|
|000009e0| 57 4e 44 20 68 77 6e 64 | 20 2d 20 68 61 6e 64 6c |WND hwnd| - handl|
|000009f0| 65 20 6f 66 20 70 61 72 | 65 6e 74 20 77 69 6e 64 |e of par|ent wind|
|00000a00| 6f 77 0d 0a 2a 2d 2a 20 | 4c 50 43 54 53 54 52 20 |ow..*-* |LPCTSTR |
|00000a10| 6c 70 73 7a 4f 70 20 2d | 20 61 64 64 72 65 73 73 |lpszOp -| address|
|00000a20| 20 6f 66 20 73 74 72 69 | 6e 67 20 66 6f 72 20 6f | of stri|ng for o|
|00000a30| 70 65 72 61 74 69 6f 6e | 20 74 6f 20 70 65 72 66 |peration| to perf|
|00000a40| 6f 72 6d 0d 0a 2a 2d 2a | 20 4c 50 43 54 53 54 52 |orm..*-*| LPCTSTR|
|00000a50| 20 6c 70 73 7a 46 69 6c | 65 20 2d 20 61 64 64 72 | lpszFil|e - addr|
|00000a60| 65 73 73 20 6f 66 20 73 | 74 72 69 6e 67 20 66 6f |ess of s|tring fo|
|00000a70| 72 20 66 69 6c 65 6e 61 | 6d 65 0d 0a 2a 2d 2a 20 |r filena|me..*-* |
|00000a80| 4c 50 54 53 54 52 20 6c | 70 73 7a 50 61 72 61 6d |LPTSTR l|pszParam|
|00000a90| 73 20 2d 20 61 64 64 72 | 65 73 73 20 6f 66 20 73 |s - addr|ess of s|
|00000aa0| 74 72 69 6e 67 20 66 6f | 72 20 65 78 65 63 75 74 |tring fo|r execut|
|00000ab0| 61 62 6c 65 2d 66 69 6c | 65 20 70 61 72 61 6d 65 |able-fil|e parame|
|00000ac0| 74 65 72 73 0d 0a 2a 2d | 2a 20 4c 50 43 54 53 54 |ters..*-|* LPCTST|
|00000ad0| 52 20 6c 70 73 7a 44 69 | 72 20 2d 20 61 64 64 72 |R lpszDi|r - addr|
|00000ae0| 65 73 73 20 6f 66 20 73 | 74 72 69 6e 67 20 66 6f |ess of s|tring fo|
|00000af0| 72 20 64 65 66 61 75 6c | 74 20 64 69 72 65 63 74 |r defaul|t direct|
|00000b00| 6f 72 79 0d 0a 2a 2d 2a | 20 49 4e 54 20 77 53 68 |ory..*-*| INT wSh|
|00000b10| 6f 77 43 6d 64 20 2d 20 | 77 68 65 74 68 65 72 20 |owCmd - |whether |
|00000b20| 66 69 6c 65 20 69 73 20 | 73 68 6f 77 6e 20 77 68 |file is |shown wh|
|00000b30| 65 6e 20 6f 70 65 6e 65 | 64 0d 0a 44 45 43 4c 41 |en opene|d..DECLA|
|00000b40| 52 45 20 49 4e 54 45 47 | 45 52 20 53 68 65 6c 6c |RE INTEG|ER Shell|
|00000b50| 45 78 65 63 75 74 65 20 | 3b 0d 0a 09 20 20 20 20 |Execute |;... |
|00000b60| 49 4e 20 53 48 45 4c 4c | 33 32 2e 44 4c 4c 20 3b |IN SHELL|32.DLL ;|
|00000b70| 0d 0a 09 20 20 20 20 49 | 4e 54 45 47 45 52 20 6e |... I|NTEGER n|
|00000b80| 57 69 6e 48 61 6e 64 6c | 65 2c 3b 0d 0a 09 20 20 |WinHandl|e,;... |
|00000b90| 20 20 53 54 52 49 4e 47 | 20 63 4f 70 65 72 61 74 | STRING| cOperat|
|00000ba0| 69 6f 6e 2c 3b 20 20 20 | 0d 0a 09 20 20 20 20 53 |ion,; |... S|
|00000bb0| 54 52 49 4e 47 20 63 46 | 69 6c 65 4e 61 6d 65 2c |TRING cF|ileName,|
|00000bc0| 3b 0d 0a 09 20 20 20 20 | 53 54 52 49 4e 47 20 63 |;... |STRING c|
|00000bd0| 50 61 72 61 6d 65 74 65 | 72 73 2c 3b 0d 0a 09 20 |Paramete|rs,;... |
|00000be0| 20 20 20 53 54 52 49 4e | 47 20 63 44 69 72 65 63 | STRIN|G cDirec|
|00000bf0| 74 6f 72 79 2c 3b 0d 0a | 09 20 20 20 20 49 4e 54 |tory,;..|. INT|
|00000c00| 45 47 45 52 20 6e 53 68 | 6f 77 57 69 6e 64 6f 77 |EGER nSh|owWindow|
|00000c10| 0d 0a 52 45 54 55 52 4e | 20 53 68 65 6c 6c 45 78 |..RETURN| ShellEx|
|00000c20| 65 63 75 74 65 28 30 2c | 6c 63 4f 70 65 72 61 74 |ecute(0,|lcOperat|
|00000c30| 69 6f 6e 2c 6c 63 46 69 | 6c 65 6e 61 6d 65 2c 22 |ion,lcFi|lename,"|
|00000c40| 22 2c 6c 63 57 6f 72 6b | 44 69 72 2c 31 29 0d 0a |",lcWork|Dir,1)..|
|00000c50| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 00 00 00 01 00 |..ENDPRO|C.......|
|00000c60| 00 00 18 4e 61 6d 65 20 | 3d 20 22 5f 73 68 65 6c |...Name |= "_shel|
|00000c70| 6c 65 78 65 63 75 74 65 | 22 0d 0a 00 00 00 01 00 |lexecute|".......|
|00000c80| 00 00 06 63 75 73 74 6f | 6d 00 00 00 01 00 00 00 |...custo|m.......|
|00000c90| 09 5f 62 61 73 65 2e 76 | 63 78 00 00 00 01 00 00 |._base.v|cx......|
|00000ca0| 00 f9 55 73 65 64 20 74 | 6f 20 73 61 76 65 2c 20 |..Used t|o save, |
|00000cb0| 73 65 74 2c 20 61 6e 64 | 20 72 65 73 74 6f 72 65 |set, and| restore|
|00000cc0| 20 53 45 54 20 63 6f 6d | 6d 61 6e 64 73 2e 20 20 | SET com|mands. |
|00000cd0| 4f 70 74 69 6f 6e 61 6c | 20 70 61 72 61 6d 65 74 |Optional| paramet|
|00000ce0| 65 72 73 3a 20 20 20 75 | 41 72 67 75 6d 65 6e 74 |ers: u|Argument|
|00000cf0| 31 20 5b 2c 20 75 41 72 | 67 75 6d 65 6e 74 32 5d |1 [, uAr|gument2]|
|00000d00| 20 5b 2c 20 6c 4e 6f 52 | 65 73 74 6f 72 65 5d 2e | [, lNoR|estore].|
|00000d10| 20 20 54 68 69 73 20 63 | 6c 61 73 73 65 73 20 6f | This c|lasses o|
|00000d20| 6e 6c 79 20 68 61 6e 64 | 6c 65 73 20 53 45 54 20 |nly hand|les SET |
|00000d30| 63 6f 6d 6d 61 6e 64 73 | 20 74 68 61 74 20 68 61 |commands| that ha|
|00000d40| 76 65 20 61 20 75 6e 69 | 71 75 65 20 66 69 72 73 |ve a uni|que firs|
|00000d50| 74 20 66 6f 75 72 20 63 | 68 61 72 61 63 74 65 72 |t four c|haracter|
|00000d60| 73 20 69 6e 20 74 68 65 | 69 72 20 6e 61 6d 65 20 |s in the|ir name |
|00000d70| 61 6e 64 20 61 20 66 65 | 77 20 53 45 54 20 63 6f |and a fe|w SET co|
|00000d80| 6d 6d 61 6e 64 73 20 6e | 6f 74 20 66 75 6c 6c 79 |mmands n|ot fully|
|00000d90| 20 73 75 70 70 6f 72 74 | 65 64 2e 00 00 00 01 00 | support|ed......|
|00000da0| 00 03 e9 63 73 65 74 63 | 6f 6d 6d 61 6e 64 20 54 |...csetc|ommand T|
|00000db0| 68 65 20 53 45 54 20 63 | 6f 6d 6d 61 6e 64 20 6e |he SET c|ommand n|
|00000dc0| 61 6d 65 2e 0d 0a 75 6f | 6c 64 76 61 6c 75 65 20 |ame...uo|ldvalue |
|00000dd0| 54 68 65 20 6f 72 69 67 | 69 6e 61 6c 20 73 65 74 |The orig|inal set|
|00000de0| 74 69 6e 67 20 6f 66 20 | 74 68 65 20 53 45 54 20 |ting of |the SET |
|00000df0| 63 6f 6d 6d 61 6e 64 20 | 61 73 20 53 45 54 28 3c |command |as SET(<|
|00000e00| 63 6f 6d 6d 61 6e 64 3e | 29 2e 0d 0a 75 6f 6c 64 |command>|)...uold|
|00000e10| 76 61 6c 75 65 31 20 54 | 68 65 20 6f 72 69 67 69 |value1 T|he origi|
|00000e20| 6e 61 6c 20 73 65 74 74 | 69 6e 67 20 6f 66 20 74 |nal sett|ing of t|
|00000e30| 68 65 20 53 45 54 20 63 | 6f 6d 6d 61 6e 64 20 61 |he SET c|ommand a|
|00000e40| 73 20 53 45 54 28 3c 63 | 6f 6d 6d 61 6e 64 3e 2c |s SET(<c|ommand>,|
|00000e50| 31 29 2e 0d 0a 75 6f 6c | 64 76 61 6c 75 65 32 20 |1)...uol|dvalue2 |
|00000e60| 54 68 65 20 6f 72 69 67 | 69 6e 61 6c 20 73 65 74 |The orig|inal set|
|00000e70| 74 69 6e 67 20 6f 66 20 | 74 68 65 20 53 45 54 20 |ting of |the SET |
|00000e80| 63 6f 6d 6d 61 6e 64 20 | 61 73 20 53 45 54 28 3c |command |as SET(<|
|00000e90| 63 6f 6d 6d 61 6e 64 3e | 2c 32 29 2e 0d 0a 6c 65 |command>|,2)...le|
|00000ea0| 72 72 6f 72 20 49 6e 64 | 69 63 61 74 65 73 20 61 |rror Ind|icates a|
|00000eb0| 6e 20 65 72 72 6f 72 20 | 6f 63 63 75 72 65 64 20 |n error |occured |
|00000ec0| 64 75 72 69 6e 67 20 74 | 68 65 20 65 78 65 63 75 |during t|he execu|
|00000ed0| 74 69 6f 6e 20 6f 66 20 | 74 68 65 20 53 45 54 20 |tion of |the SET |
|00000ee0| 63 6f 6d 6d 61 6e 64 2e | 0d 0a 6c 6e 6f 72 65 73 |command.|..lnores|
|00000ef0| 74 6f 72 65 20 53 70 65 | 63 69 66 69 65 73 20 69 |tore Spe|cifies i|
|00000f00| 66 20 74 68 65 20 6f 72 | 69 67 69 6e 61 6c 20 53 |f the or|iginal S|
|00000f10| 45 54 20 76 61 6c 75 65 | 73 20 61 72 65 20 72 65 |ET value|s are re|
|00000f20| 73 74 6f 72 65 64 20 77 | 68 65 6e 20 74 68 65 20 |stored w|hen the |
|00000f30| 6f 62 6a 65 63 74 20 69 | 73 20 72 65 6c 65 61 73 |object i|s releas|
|00000f40| 65 64 2e 0d 0a 2a 67 65 | 74 73 65 74 63 6f 6d 6d |ed...*ge|tsetcomm|
|00000f50| 61 6e 64 20 52 65 74 75 | 72 6e 73 20 74 68 65 20 |and Retu|rns the |
|00000f60| 53 45 54 20 63 6f 6d 6d | 61 6e 64 20 6e 61 6d 65 |SET comm|and name|
|00000f70| 2e 0d 0a 2a 72 65 73 74 | 6f 72 65 20 52 65 73 74 |...*rest|ore Rest|
|00000f80| 6f 72 65 73 20 74 68 65 | 20 6f 72 69 67 69 6e 61 |ores the| origina|
|00000f90| 6c 20 53 45 54 20 73 65 | 74 74 69 6e 67 73 2e 0d |l SET se|ttings..|
|00000fa0| 0a 2a 73 65 74 20 53 65 | 74 73 20 65 6e 76 69 72 |.*set Se|ts envir|
|00000fb0| 6f 6e 6d 65 6e 74 20 73 | 65 74 74 69 6e 67 2e 20 |onment s|etting. |
|00000fc0| 75 41 72 67 75 6d 65 6e | 74 31 20 5b 2c 20 75 41 |uArgumen|t1 [, uA|
|00000fd0| 72 67 75 6d 65 6e 74 32 | 5d 20 5b 2c 20 6c 4e 6f |rgument2|] [, lNo|
|00000fe0| 52 65 73 74 6f 72 65 5d | 0d 0a 2a 67 65 74 20 4e |Restore]|..*get N|
|00000ff0| 6f 20 70 61 72 61 6d 65 | 74 65 72 20 72 65 74 75 |o parame|ter retu|
|00001000| 72 6e 73 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |rns the |current |
|00001010| 53 45 54 28 29 20 76 61 | 6c 75 65 2e 20 20 31 20 |SET() va|lue. 1 |
|00001020| 72 65 74 75 72 6e 73 20 | 74 68 65 20 63 75 72 72 |returns |the curr|
|00001030| 65 6e 74 20 53 45 54 28 | 2c 31 29 20 76 61 6c 75 |ent SET(|,1) valu|
|00001040| 65 2e 20 20 32 20 72 65 | 74 75 72 6e 73 20 74 68 |e. 2 re|turns th|
|00001050| 65 20 63 75 72 72 65 6e | 74 20 53 45 54 28 2c 32 |e curren|t SET(,2|
|00001060| 29 20 76 61 6c 75 65 2e | 20 20 30 20 72 65 74 75 |) value.| 0 retu|
|00001070| 72 6e 73 20 74 68 65 20 | 6f 72 69 67 69 6e 61 6c |rns the |original|
|00001080| 20 53 45 54 28 29 20 76 | 61 6c 75 65 2e 20 20 2d | SET() v|alue. -|
|00001090| 31 20 72 65 74 75 72 6e | 73 20 74 68 65 20 6f 72 |1 return|s the or|
|000010a0| 69 67 69 6e 61 6c 20 53 | 45 54 28 2c 31 29 20 76 |iginal S|ET(,1) v|
|000010b0| 61 6c 75 65 2e 20 20 2d | 32 20 72 65 74 75 72 6e |alue. -|2 return|
|000010c0| 73 20 74 68 65 20 6f 72 | 69 67 69 6e 61 6c 20 53 |s the or|iginal S|
|000010d0| 45 54 28 2c 32 29 20 76 | 61 6c 75 65 2e 0d 0a 2a |ET(,2) v|alue...*|
|000010e0| 64 69 73 61 62 6c 65 72 | 65 73 74 6f 72 65 20 44 |disabler|estore D|
|000010f0| 69 73 61 62 6c 65 73 20 | 74 68 65 20 61 75 74 6f |isables |the auto|
|00001100| 6d 61 74 69 63 20 72 65 | 73 74 6f 72 65 20 6f 66 |matic re|store of|
|00001110| 20 73 65 74 74 69 6e 67 | 73 20 77 68 65 6e 20 69 | setting|s when i|
|00001120| 6e 20 6f 62 6a 65 63 74 | 20 72 65 6c 65 61 73 65 |n object| release|
|00001130| 20 6d 6f 64 65 2e 0d 0a | 2a 63 68 65 63 6b 76 61 | mode...|*checkva|
|00001140| 6c 75 65 20 52 65 74 75 | 72 6e 73 20 74 68 65 20 |lue Retu|rns the |
|00001150| 70 72 6f 70 65 72 20 53 | 45 54 28 3c 63 6f 6d 6d |proper S|ET(<comm|
|00001160| 61 6e 64 3e 29 20 76 61 | 6c 75 65 20 62 61 65 73 |and>) va|lue baes|
|00001170| 64 20 6f 6e 20 74 68 65 | 20 53 45 54 20 63 6f 6d |d on the| SET com|
|00001180| 6d 61 6e 64 20 6e 61 6d | 65 2e 0d 0a 00 00 00 01 |mand nam|e.......|
|00001190| 00 00 0d 56 fe f2 ff 20 | 02 01 00 00 00 3d 0d 00 |...V... |.....=..|
|000011a0| 00 3d 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.=......|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 6d 96 09 00 00 |........|...m....|
|000011c0| 00 25 00 00 00 fa 0a 00 | 00 00 00 00 00 74 0c 00 |.%......|.....t..|
|000011d0| 00 6f 00 00 00 96 0b 00 | 00 00 00 00 00 00 00 00 |.o......|........|
|000011e0| 00 fc 03 00 03 00 55 00 | 00 0f 00 0c 00 42 fc f4 |......U.|.....B..|
|000011f0| 00 00 f7 01 00 fd fe 03 | 00 55 02 00 04 00 54 48 |........|.U....TH|
|00001200| 49 53 0b 00 43 53 45 54 | 43 4f 4d 4d 41 4e 44 05 |IS..CSET|COMMAND.|
|00001210| 01 13 00 ae f7 00 00 07 | f7 01 00 07 f7 02 00 07 |........|........|
|00001220| f7 03 00 fe 0b 00 54 f7 | 00 00 10 fc 61 fd fe 14 |......T.|....a...|
|00001230| 00 54 f7 01 00 10 fc 43 | f8 01 00 f4 04 00 f6 05 |.T.....C|........|
|00001240| 00 fd fe 15 00 54 f7 02 | 00 10 fc 43 f9 02 ff ff |.....T..|...C....|
|00001250| f4 04 00 f6 05 00 fd fe | 15 00 54 f7 03 00 10 fc |........|..T.....|
|00001260| 43 f9 02 fe ff f4 04 00 | f6 05 00 fd fe 58 00 25 |C.......|.....X.%|
|00001270| fc f7 02 00 43 f4 04 00 | f7 06 00 f8 01 01 76 14 |....C...|......v.|
|00001280| 0a f0 11 00 43 00 f7 01 | 00 00 f7 02 00 f4 04 00 |....C...|........|
|00001290| f6 07 00 0a 09 03 f1 26 | 00 f7 03 00 43 f4 04 00 |.......&|....C...|
|000012a0| f7 06 00 f8 01 02 76 14 | 0a f0 11 00 43 00 f7 01 |......v.|....C...|
|000012b0| 00 00 f7 03 00 f4 04 00 | f6 07 00 0a 09 03 0b fd |........|........|
|000012c0| f9 05 bf 00 fe 0b 00 54 | f7 00 00 10 fc 2d fd fe |.......T|.....-..|
|000012d0| 04 00 1e fe 27 00 25 fc | f7 01 00 43 f4 04 00 f7 |....'.%.|...C....|
|000012e0| 06 00 76 14 0a f0 0d 00 | 43 00 f7 01 00 f4 04 00 |..v.....|C.......|
|000012f0| f6 07 00 0a 09 fd f9 05 | f5 00 fe 0b 00 54 f7 00 |........|.....T..|
|00001300| 00 10 fc 2d fd fe 04 00 | 1e fe 09 00 42 fc f7 00 |...-....|....B...|
|00001310| 00 fd fe 03 00 55 08 00 | 08 00 4c 4c 52 45 53 55 |.....U..|..LLRESU|
|00001320| 4c 54 0a 00 4c 43 4f 4c | 44 56 41 4c 55 45 0b 00 |LT..LCOL|DVALUE..|
|00001330| 4c 43 4f 4c 44 56 41 4c | 55 45 31 0b 00 4c 43 4f |LCOLDVAL|UE1..LCO|
|00001340| 4c 44 56 41 4c 55 45 32 | 04 00 54 48 49 53 03 00 |LDVALUE2|..THIS..|
|00001350| 47 45 54 0b 00 43 53 45 | 54 43 4f 4d 4d 41 4e 44 |GET..CSE|TCOMMAND|
|00001360| 03 00 53 45 54 24 04 0f | 00 af f7 00 00 07 f7 01 |..SET$..|........|
|00001370| 00 07 f7 02 00 fe 13 00 | ae f7 03 00 07 f7 04 00 |........|........|
|00001380| 07 f7 05 00 07 f7 06 00 | fe 0e 00 54 f4 07 00 f7 |........|...T....|
|00001390| 08 00 10 fc 2d fd fe 10 | 00 25 fc 43 c4 f8 01 00 |....-...|.%.C....|
|000013a0| 10 fd f9 05 47 00 fe 07 | 00 42 fc 2d fd fe 04 00 |....G...|.B.-....|
|000013b0| 1e fe 1a 00 54 f7 04 00 | 10 fc 43 d9 0b 00 74 75 |....T...|..C...tu|
|000013c0| 41 72 67 75 6d 65 6e 74 | 31 62 fd fe 1a 00 54 f7 |Argument|1b....T.|
|000013d0| 05 00 10 fc 43 d9 0b 00 | 74 75 41 72 67 75 6d 65 |....C...|tuArgume|
|000013e0| 6e 74 32 62 fd fe 17 00 | 54 f7 03 00 10 fc 43 43 |nt2b....|T.....CC|
|000013f0| f4 07 00 f7 09 00 f8 01 | 04 3d 9b fd fe 24 00 25 |........|.=...$.%|
|00001400| fc 43 f7 01 00 d1 0a f0 | 0a 00 f7 05 00 d9 01 00 |.C......|........|
|00001410| 4c 14 0a 09 f1 04 00 f7 | 01 00 0b fd f9 05 70 01 |L.......|......p.|
|00001420| fe 12 00 25 fc f7 05 00 | d9 01 00 43 14 fd f9 05 |...%....|...C....|
|00001430| 28 01 fe 25 00 25 fc f7 | 03 00 d9 04 00 50 52 49 |(..%.%..|.....PRI|
|00001440| 4e 14 f0 0d 00 43 f7 01 | 00 66 d9 03 00 50 52 4e |N....C..|.f...PRN|
|00001450| 14 09 fd f9 05 01 01 fe | 10 00 54 f7 06 00 10 fc |........|..T.....|
|00001460| d9 03 00 20 54 4f fd fe | 08 00 1b f9 05 24 01 fe |... TO..|.....$..|
|00001470| 1b 00 54 f7 06 00 10 fc | d9 05 00 20 54 4f 20 5b |..T.....|... TO [|
|00001480| f7 01 00 06 d9 01 00 5d | 06 fd fe 04 00 1e fe 08 |.......]|........|
|00001490| 00 1b f9 05 4c 01 fe 1c | 00 54 f7 06 00 10 fc d9 |....L...|.T......|
|000014a0| 04 00 20 54 4f 20 43 43 | f7 01 00 f8 01 09 5a 9b |.. TO CC|......Z.|
|000014b0| 06 fd fe 04 00 1e fe 20 | 00 01 53 45 54 20 26 6c |....... |..SET &l|
|000014c0| 63 53 65 74 43 6f 6d 6d | 61 6e 64 20 26 6c 63 43 |cSetComm|and &lcC|
|000014d0| 6c 61 75 73 65 73 0a 04 | 00 1e fe 24 00 25 fc 43 |lauses..|...$.%.C|
|000014e0| f7 00 00 d1 0a f0 0a 00 | f7 04 00 d9 01 00 4c 14 |........|......L.|
|000014f0| 0a 09 f1 04 00 f7 00 00 | 0b fd f9 05 ee 03 fe 12 |........|........|
|00001500| 00 25 fc f7 04 00 d9 01 | 00 43 14 fd f9 05 a6 03 |.%......|.C......|
|00001510| fe 0d 00 54 f7 06 00 10 | fc f7 00 00 fd fe d6 01 |...T....|........|
|00001520| 25 fc f7 03 00 d9 04 00 | 43 4c 41 53 14 f1 0c 00 |%.......|CLAS....|
|00001530| f7 03 00 d9 04 00 43 4f | 4c 4c 14 0b f1 0c 00 f7 |......CO|LL......|
|00001540| 03 00 d9 04 00 43 4f 56 | 45 14 0b f1 0c 00 f7 03 |.....COV|E.......|
|00001550| 00 d9 04 00 44 41 54 41 | 14 0b f1 0c 00 f7 03 00 |....DATA|........|
|00001560| d9 04 00 44 45 46 41 14 | 0b f1 0c 00 f7 03 00 d9 |...DEFA.|........|
|00001570| 04 00 44 45 42 55 14 0b | f1 0c 00 f7 03 00 d9 04 |..DEBU..|........|
|00001580| 00 44 45 56 49 14 0b f1 | 0c 00 f7 03 00 d9 04 00 |.DEVI...|........|
|00001590| 44 49 53 50 14 0b f1 0c | 00 f7 03 00 d9 04 00 45 |DISP....|.......E|
|000015a0| 56 45 4e 14 0b f1 0c 00 | f7 03 00 d9 04 00 46 49 |VEN.....|......FI|
|000015b0| 4c 54 14 0b f1 0c 00 f7 | 03 00 d9 04 00 46 4f 52 |LT......|.....FOR|
|000015c0| 4d 14 0b f1 0c 00 f7 03 | 00 d9 04 00 49 4e 44 45 |M.......|....INDE|
|000015d0| 14 0b f1 0b 00 f7 03 00 | d9 03 00 4b 45 59 14 0b |........|...KEY..|
|000015e0| f1 0c 00 f7 03 00 d9 04 | 00 4b 45 59 43 14 0b f1 |........|.KEYC...|
|000015f0| 0c 00 f7 03 00 d9 04 00 | 4c 49 42 52 14 0b f1 0c |........|LIBR....|
|00001600| 00 f7 03 00 d9 04 00 4d | 41 43 4b 14 0b f1 0c 00 |.......M|ACK.....|
|00001610| f7 03 00 d9 04 00 4d 41 | 52 4b 14 0b f1 0c 00 f7 |......MA|RK......|
|00001620| 03 00 d9 04 00 4d 45 53 | 53 14 0b f1 0c 00 f7 03 |.....MES|S.......|
|00001630| 00 d9 04 00 4e 4f 43 50 | 14 0b f1 0c 00 f7 03 00 |....NOCP|........|
|00001640| d9 04 00 4f 52 44 45 14 | 0b f1 0c 00 f7 03 00 d9 |...ORDE.|........|
|00001650| 04 00 50 41 54 48 14 0b | f1 0c 00 f7 03 00 d9 04 |..PATH..|........|
|00001660| 00 50 44 53 45 14 0b f1 | 0c 00 f7 03 00 d9 04 00 |.PDSE...|........|
|00001670| 50 4f 49 4e 14 0b f1 0c | 00 f7 03 00 d9 04 00 50 |POIN....|.......P|
|00001680| 52 4f 43 14 0b f1 0c 00 | f7 03 00 d9 04 00 52 45 |ROC.....|......RE|
|00001690| 4c 41 14 0b f1 0c 00 f7 | 03 00 d9 04 00 53 45 50 |LA......|.....SEP|
|000016a0| 41 14 0b f1 0c 00 f7 03 | 00 d9 04 00 53 4b 49 50 |A.......|....SKIP|
|000016b0| 14 0b f1 0c 00 f7 03 00 | d9 04 00 54 4f 50 49 14 |........|...TOPI.|
|000016c0| 0b f1 0c 00 f7 03 00 d9 | 04 00 54 59 50 45 14 0b |........|..TYPE..|
|000016d0| f1 0c 00 f7 03 00 d9 04 | 00 55 44 46 50 14 0b f1 |........|.UDFP...|
|000016e0| 0c 00 f7 03 00 d9 04 00 | 58 43 4d 44 14 0b fd f9 |........|XCMD....|
|000016f0| 05 a2 03 fe 15 00 54 f7 | 06 00 10 fc d9 04 00 20 |......T.|....... |
|00001700| 54 4f 20 f7 06 00 06 fd | fe 04 00 1e fe 08 00 1b |TO .....|........|
|00001710| f9 05 ca 03 fe 1c 00 54 | f7 06 00 10 fc d9 04 00 |.......T|........|
|00001720| 20 54 4f 20 43 43 f7 00 | 00 f8 01 09 5a 9b 06 fd | TO CC..|....Z...|
|00001730| fe 04 00 1e fe 20 00 01 | 53 45 54 20 26 6c 63 53 |..... ..|SET &lcS|
|00001740| 65 74 43 6f 6d 6d 61 6e | 64 20 26 6c 63 43 6c 61 |etComman|d &lcCla|
|00001750| 75 73 65 73 0a 04 00 1e | fe 24 00 25 fc f4 07 00 |uses....|.$.%....|
|00001760| f7 08 00 f1 11 00 f7 02 | 00 f0 09 00 43 f4 07 00 |........|....C...|
|00001770| f6 0a 00 0a 09 03 0b fd | f9 05 1d 04 fe 07 00 42 |........|.......B|
|00001780| fc 2d fd fe 04 00 1e fe | 03 00 55 0b 00 0b 00 54 |.-......|..U....T|
|00001790| 55 41 52 47 55 4d 45 4e | 54 31 0b 00 54 55 41 52 |UARGUMEN|T1..TUAR|
|000017a0| 47 55 4d 45 4e 54 32 10 | 00 54 4c 44 49 53 41 42 |GUMENT2.|.TLDISAB|
|000017b0| 4c 45 52 45 53 54 4f 52 | 45 0c 00 4c 43 53 45 54 |LERESTOR|E..LCSET|
|000017c0| 43 4f 4d 4d 41 4e 44 07 | 00 4c 43 54 59 50 45 31 |COMMAND.|.LCTYPE1|
|000017d0| 07 00 4c 43 54 59 50 45 | 32 09 00 4c 43 43 4c 41 |..LCTYPE|2..LCCLA|
|000017e0| 55 53 45 53 04 00 54 48 | 49 53 06 00 4c 45 52 52 |USES..TH|IS..LERR|
|000017f0| 4f 52 0b 00 43 53 45 54 | 43 4f 4d 4d 41 4e 44 0e |OR..CSET|COMMAND.|
|00001800| 00 44 49 53 41 42 4c 45 | 52 45 53 54 4f 52 45 3c |.DISABLE|RESTORE<|
|00001810| 01 07 00 af f7 00 00 fe | 0b 00 ae f7 01 00 07 f7 |........|........|
|00001820| 02 00 fe 0b 00 54 f7 02 | 00 10 fc 2d fd fe 0d 00 |.....T..|...-....|
|00001830| 18 48 f9 05 2a 00 f9 05 | 2c 01 fe 1e 00 0c fc 43 |.H..*...|,......C|
|00001840| d9 0a 00 74 6e 41 72 67 | 75 6d 65 6e 74 62 d9 01 |...tnArg|umentb..|
|00001850| 00 4e 0f fd f9 05 61 00 | fe 19 00 54 f7 01 00 10 |.N....a.|...T....|
|00001860| fc 43 43 f4 03 00 f7 05 | 00 76 f4 03 00 f6 04 00 |.CC.....|.v......|
|00001870| fd fe 11 00 0c fc f7 00 | 00 f8 01 00 10 fd f9 05 |........|........|
|00001880| 8d 00 fe 10 00 54 f7 01 | 00 10 fc f4 03 00 f7 06 |.....T..|........|
|00001890| 00 fd fe 0b 00 54 f7 02 | 00 10 fc 61 fd fe 11 00 |.....T..|...a....|
|000018a0| 0c fc f7 00 00 f8 01 01 | 10 fd f9 05 b3 00 fe 15 |........|........|
|000018b0| 00 54 f7 01 00 10 fc 43 | f4 03 00 f7 05 00 f8 01 |.T.....C|........|
|000018c0| 01 76 fd fe 11 00 0c fc | f7 00 00 f8 01 02 10 fd |.v......|........|
|000018d0| f9 05 d9 00 fe 15 00 54 | f7 01 00 10 fc 43 f4 03 |.......T|.....C..|
|000018e0| 00 f7 05 00 f8 01 02 76 | fd fe 12 00 0c fc f7 00 |.......v|........|
|000018f0| 00 f9 02 ff ff 10 fd f9 | 05 fb 00 fe 10 00 54 f7 |........|......T.|
|00001900| 01 00 10 fc f4 03 00 f7 | 07 00 fd fe 12 00 0c fc |........|........|
|00001910| f7 00 00 f9 02 fe ff 10 | fd f9 05 1d 01 fe 10 00 |........|........|
|00001920| 54 f7 01 00 10 fc f4 03 | 00 f7 08 00 fd fe 08 00 |T.......|........|
|00001930| 32 f9 05 2c 01 fe 07 00 | 42 fc e4 fd fe 04 00 1c |2..,....|B.......|
|00001940| fe 09 00 42 fc f7 01 00 | fd fe 03 00 55 09 00 0a |...B....|....U...|
|00001950| 00 54 4e 41 52 47 55 4d | 45 4e 54 07 00 4c 43 56 |.TNARGUM|ENT..LCV|
|00001960| 41 4c 55 45 08 00 4c 4c | 41 44 4a 55 53 54 04 00 |ALUE..LL|ADJUST..|
|00001970| 54 48 49 53 0a 00 43 48 | 45 43 4b 56 41 4c 55 45 |THIS..CH|ECKVALUE|
|00001980| 0b 00 43 53 45 54 43 4f | 4d 4d 41 4e 44 09 00 55 |..CSETCO|MMAND..U|
|00001990| 4f 4c 44 56 41 4c 55 45 | 0a 00 55 4f 4c 44 56 41 |OLDVALUE|..UOLDVA|
|000019a0| 4c 55 45 31 0a 00 55 4f | 4c 44 56 41 4c 55 45 32 |LUE1..UO|LDVALUE2|
|000019b0| 11 00 0e 00 54 f4 00 00 | f7 01 00 10 fc 61 fd fe |....T...|.....a..|
|000019c0| 03 00 55 02 00 04 00 54 | 48 49 53 0a 00 4c 4e 4f |..U....T|HIS..LNO|
|000019d0| 52 45 53 54 4f 52 45 6c | 00 07 00 af f7 00 00 fe |RESTOREl|........|
|000019e0| 1b 00 25 fc 43 d9 07 00 | 74 63 56 61 6c 75 65 62 |..%.C...|tcValueb|
|000019f0| d9 01 00 43 0f fd f9 05 | 2b 00 fe 09 00 42 fc f7 |...C....|+....B..|
|00001a00| 00 00 fd fe 04 00 1e fe | 1d 00 25 fc 43 f4 01 00 |........|..%.C...|
|00001a10| f7 02 00 f8 01 04 3d d9 | 04 00 44 45 46 41 14 fd |......=.|..DEFA..|
|00001a20| f9 05 5c 00 fe 10 00 42 | fc f7 00 00 43 f9 04 d3 |..\....B|....C...|
|00001a30| 07 5d 06 fd fe 04 00 1e | fe 09 00 42 fc f7 00 00 |.]......|...B....|
|00001a40| fd fe 03 00 55 03 00 07 | 00 54 43 56 41 4c 55 45 |....U...|.TCVALUE|
|00001a50| 04 00 54 48 49 53 0b 00 | 43 53 45 54 43 4f 4d 4d |..THIS..|CSETCOMM|
|00001a60| 41 4e 44 25 00 11 00 25 | fc f4 00 00 f7 01 00 0a |AND%...%|........|
|00001a70| fd f9 05 1e 00 fe 0d 00 | 42 fc 43 f4 00 00 f6 02 |........|B.C.....|
|00001a80| 00 fd fe 04 00 1e fe 03 | 00 55 03 00 04 00 54 48 |........|.U....TH|
|00001a90| 49 53 0a 00 4c 4e 4f 52 | 45 53 54 4f 52 45 07 00 |IS..LNOR|ESTORE..|
|00001aa0| 52 45 53 54 4f 52 45 2b | 01 13 00 af f7 00 00 07 |RESTORE+|........|
|00001ab0| f7 01 00 07 f7 02 00 07 | f7 03 00 fe 07 00 ae f7 |........|........|
|00001ac0| 04 00 fe 0c 00 54 f7 04 | 00 10 fc 43 c4 fd fe 3d |.....T..|...C...=|
|00001ad0| 00 25 fc f7 04 00 f8 01 | 00 10 f1 06 00 43 f7 00 |.%......|.....C..|
|00001ae0| 00 a1 0b f1 06 00 43 f7 | 00 00 d1 0b f1 17 00 43 |......C.|.......C|
|00001af0| d9 0c 00 74 63 53 65 74 | 43 6f 6d 6d 61 6e 64 62 |...tcSet|Commandb|
|00001b00| d9 01 00 43 0f 0b fd f9 | 05 67 00 fe 04 00 42 fe |...C....|.g....B.|
|00001b10| 04 00 1e fe 0e 00 54 f4 | 05 00 f7 06 00 10 fc 2d |......T.|.......-|
|00001b20| fd fe 14 00 54 f4 05 00 | f7 07 00 10 fc 43 43 f7 |....T...|.....CC.|
|00001b30| 00 00 9b 66 fd fe 1c 00 | 54 f4 05 00 f7 08 00 10 |...f....|T.......|
|00001b40| fc 43 43 f4 05 00 f7 07 | 00 76 f4 05 00 f6 09 00 |.CC.....|.v......|
|00001b50| fd fe 10 00 25 fc f4 05 | 00 f7 06 00 fd f9 05 c0 |....%...|........|
|00001b60| 00 fe 07 00 42 fc 2d fd | fe 04 00 1e fe 18 00 54 |....B.-.|.......T|
|00001b70| f4 05 00 f7 0a 00 10 fc | 43 f4 05 00 f7 07 00 f8 |........|C.......|
|00001b80| 01 01 76 fd fe 18 00 54 | f4 05 00 f7 0b 00 10 fc |..v....T|........|
|00001b90| 43 f4 05 00 f7 07 00 f8 | 01 02 76 fd fe 29 00 25 |C.......|..v..).%|
|00001ba0| fc f7 04 00 f8 01 02 12 | f0 15 00 43 00 f7 01 00 |........|...C....|
|00001bb0| 00 f7 02 00 00 f7 03 00 | f4 05 00 f6 0c 00 0a 09 |........|........|
|00001bc0| fd f9 05 24 01 fe 07 00 | 42 fc 2d fd fe 04 00 1e |...$....|B.-.....|
|00001bd0| fe 03 00 55 0d 00 0c 00 | 54 43 53 45 54 43 4f 4d |...U....|TCSETCOM|
|00001be0| 4d 41 4e 44 0b 00 54 55 | 41 52 47 55 4d 45 4e 54 |MAND..TU|ARGUMENT|
|00001bf0| 31 0b 00 54 55 41 52 47 | 55 4d 45 4e 54 32 10 00 |1..TUARG|UMENT2..|
|00001c00| 54 4c 44 49 53 41 42 4c | 45 52 45 53 54 4f 52 45 |TLDISABL|ERESTORE|
|00001c10| 0c 00 4c 4e 50 41 52 41 | 4d 45 54 45 52 53 04 00 |..LNPARA|METERS..|
|00001c20| 54 48 49 53 06 00 4c 45 | 52 52 4f 52 0b 00 43 53 |THIS..LE|RROR..CS|
|00001c30| 45 54 43 4f 4d 4d 41 4e | 44 09 00 55 4f 4c 44 56 |ETCOMMAN|D..UOLDV|
|00001c40| 41 4c 55 45 0a 00 43 48 | 45 43 4b 56 41 4c 55 45 |ALUE..CH|ECKVALUE|
|00001c50| 0a 00 55 4f 4c 44 56 41 | 4c 55 45 31 0a 00 55 4f |..UOLDVA|LUE1..UO|
|00001c60| 4c 44 56 41 4c 55 45 32 | 03 00 53 45 54 20 00 0f |LDVALUE2|..SET ..|
|00001c70| 00 af f7 00 00 07 f7 01 | 00 07 f7 02 00 fe 0e 00 |........|........|
|00001c80| 54 f4 03 00 f7 04 00 10 | fc 61 fd fe 03 00 55 05 |T.......|.a....U.|
|00001c90| 00 06 00 4e 45 52 52 4f | 52 07 00 43 4d 45 54 48 |...NERRO|R..CMETH|
|00001ca0| 4f 44 05 00 4e 4c 49 4e | 45 04 00 54 48 49 53 06 |OD..NLIN|E..THIS.|
|00001cb0| 00 4c 45 52 52 4f 52 0d | 00 67 65 74 73 65 74 63 |.LERROR.|.getsetc|
|00001cc0| 6f 6d 6d 61 6e 64 2c 00 | 00 00 00 00 ff ff 07 00 |ommand,.|........|
|00001cd0| 72 65 73 74 6f 72 65 52 | 00 00 00 00 00 ff ff 03 |restoreR|........|
|00001ce0| 00 73 65 74 a8 01 00 00 | 00 00 ff ff 03 00 67 65 |.set....|......ge|
|00001cf0| 74 52 06 00 00 00 00 ff | ff 0e 00 64 69 73 61 62 |tR......|...disab|
|00001d00| 6c 65 72 65 73 74 6f 72 | 65 f3 07 00 00 00 00 ff |lerestor|e.......|
|00001d10| ff 0a 00 63 68 65 63 6b | 76 61 6c 75 65 1a 08 00 |...check|value...|
|00001d20| 00 00 00 ff ff 07 00 44 | 65 73 74 72 6f 79 a6 08 |.......D|estroy..|
|00001d30| 00 00 00 00 ff ff 04 00 | 49 6e 69 74 ea 08 00 00 |........|Init....|
|00001d40| 00 00 ff ff 05 00 45 72 | 72 6f 72 b0 0a 00 00 00 |......Er|ror.....|
|00001d50| 00 ff ff 31 00 c1 00 33 | 00 31 01 b2 00 41 01 51 |...1...3|.1...A.Q|
|00001d60| 01 51 01 84 05 b1 00 41 | 00 72 02 b1 00 41 00 91 |.Q.....A|.r...A..|
|00001d70| 00 33 00 f1 00 31 01 e2 | 00 01 01 71 00 41 00 a1 |.3...1..|...q.A..|
|00001d80| 01 a1 01 71 01 41 02 21 | 01 51 02 01 01 81 00 b1 |...q.A.!|.Q......|
|00001d90| 01 41 00 81 00 c1 01 41 | 00 01 02 41 00 41 02 21 |.A.....A|...A.A.!|
|00001da0| 01 d1 00 f0 00 61 1d 51 | 01 41 00 81 00 c1 01 41 |.....a.Q|.A.....A|
|00001db0| 00 01 02 41 00 41 02 71 | 00 41 00 33 00 71 00 b1 |...A.A.q|.A.3.q..|
|00001dc0| 00 b2 00 d1 00 e1 01 91 | 01 11 01 01 01 b1 00 11 |........|........|
|00001dd0| 01 51 01 11 01 51 01 21 | 01 01 01 21 01 01 01 81 |.Q...Q.!|...!....|
|00001de0| 00 71 00 41 00 91 00 33 | 00 e1 00 33 00 71 00 b2 |.q.A...3|...3.q..|
|00001df0| 01 91 00 41 00 d1 01 01 | 01 41 00 91 00 33 00 11 |...A....|.A...3..|
|00001e00| 01 d1 00 41 00 33 00 31 | 01 71 00 c2 00 d2 03 41 |...A.3.1|.q.....A|
|00001e10| 00 41 00 e1 00 41 01 c1 | 01 01 01 71 00 41 00 81 |.A...A..|...q.A..|
|00001e20| 01 81 01 92 02 71 00 41 | 00 33 00 f1 00 e2 00 32 |.....q.A|.3.....2|
|00001e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e40| 00 01 00 00 00 19 00 00 | 00 32 00 00 00 01 00 00 |........|.2......|
|00001e50| 00 03 00 00 00 50 00 00 | 00 25 02 00 00 05 00 00 |.....P..|.%......|
|00001e60| 00 10 00 00 00 3f 02 00 | 00 26 09 00 00 19 00 00 |.....?..|.&......|
|00001e70| 00 35 00 00 00 40 09 00 | 00 1b 0b 00 00 4f 00 00 |.5...@..|.....O..|
|00001e80| 00 4b 00 00 00 40 0b 00 | 00 55 0b 00 00 68 00 00 |.K...@..|.U...h..|
|00001e90| 00 4d 00 00 00 76 0b 00 | 00 14 0c 00 00 6c 00 00 |.M...v..|.....l..|
|00001ea0| 00 56 00 00 00 32 0c 00 | 00 69 0c 00 00 78 00 00 |.V...2..|.i...x..|
|00001eb0| 00 5a 00 00 00 84 0c 00 | 00 c0 0e 00 00 7e 00 00 |.Z......|.....~..|
|00001ec0| 00 6c 00 00 00 dc 0e 00 | 00 13 0f 00 00 95 00 00 |.l......|........|
|00001ed0| 00 00 29 00 00 00 3d 0d | 00 00 00 00 00 00 00 00 |..)...=.|........|
|00001ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00001ef0| 0f 1e 50 52 4f 43 45 44 | 55 52 45 20 67 65 74 73 |..PROCED|URE gets|
|00001f00| 65 74 63 6f 6d 6d 61 6e | 64 0d 0a 52 45 54 55 52 |etcomman|d..RETUR|
|00001f10| 4e 20 74 68 69 73 2e 63 | 53 65 74 43 6f 6d 6d 61 |N this.c|SetComma|
|00001f20| 6e 64 0d 0a 0d 0a 45 4e | 44 50 52 4f 43 0d 0a 50 |nd....EN|DPROC..P|
|00001f30| 52 4f 43 45 44 55 52 45 | 20 72 65 73 74 6f 72 65 |ROCEDURE| restore|
|00001f40| 0d 0a 4c 4f 43 41 4c 20 | 6c 6c 52 65 73 75 6c 74 |..LOCAL |llResult|
|00001f50| 2c 6c 63 4f 6c 64 56 61 | 6c 75 65 2c 6c 63 4f 6c |,lcOldVa|lue,lcOl|
|00001f60| 64 56 61 6c 75 65 31 2c | 6c 63 4f 6c 64 56 61 6c |dValue1,|lcOldVal|
|00001f70| 75 65 32 0d 0a 0d 0a 6c | 6c 52 65 73 75 6c 74 3d |ue2....l|lResult=|
|00001f80| 2e 54 2e 0d 0a 6c 63 4f | 6c 64 56 61 6c 75 65 3d |.T...lcO|ldValue=|
|00001f90| 74 68 69 73 2e 47 65 74 | 28 30 29 0d 0a 6c 63 4f |this.Get|(0)..lcO|
|00001fa0| 6c 64 56 61 6c 75 65 31 | 3d 74 68 69 73 2e 47 65 |ldValue1|=this.Ge|
|00001fb0| 74 28 2d 31 29 0d 0a 6c | 63 4f 6c 64 56 61 6c 75 |t(-1)..l|cOldValu|
|00001fc0| 65 32 3d 74 68 69 73 2e | 47 65 74 28 2d 32 29 0d |e2=this.|Get(-2).|
|00001fd0| 0a 49 46 20 28 4e 4f 54 | 20 6c 63 4f 6c 64 56 61 |.IF (NOT| lcOldVa|
|00001fe0| 6c 75 65 31 3d 3d 53 45 | 54 28 74 68 69 73 2e 63 |lue1==SE|T(this.c|
|00001ff0| 53 65 74 43 6f 6d 6d 61 | 6e 64 2c 31 29 20 41 4e |SetComma|nd,1) AN|
|00002000| 44 20 3b 0d 0a 09 09 4e | 4f 54 20 74 68 69 73 2e |D ;....N|OT this.|
|00002010| 53 65 74 28 6c 63 4f 6c | 64 56 61 6c 75 65 2c 6c |Set(lcOl|dValue,l|
|00002020| 63 4f 6c 64 56 61 6c 75 | 65 31 29 29 20 4f 52 20 |cOldValu|e1)) OR |
|00002030| 3b 0d 0a 09 28 4e 4f 54 | 20 6c 63 4f 6c 64 56 61 |;...(NOT| lcOldVa|
|00002040| 6c 75 65 32 3d 3d 53 45 | 54 28 74 68 69 73 2e 63 |lue2==SE|T(this.c|
|00002050| 53 65 74 43 6f 6d 6d 61 | 6e 64 2c 32 29 20 41 4e |SetComma|nd,2) AN|
|00002060| 44 20 3b 0d 0a 09 09 4e | 4f 54 20 74 68 69 73 2e |D ;....N|OT this.|
|00002070| 53 65 74 28 6c 63 4f 6c | 64 56 61 6c 75 65 2c 6c |Set(lcOl|dValue,l|
|00002080| 63 4f 6c 64 56 61 6c 75 | 65 32 29 29 0d 0a 09 6c |cOldValu|e2))...l|
|00002090| 6c 52 65 73 75 6c 74 3d | 2e 46 2e 0d 0a 45 4e 44 |lResult=|.F...END|
|000020a0| 49 46 0d 0a 49 46 20 4e | 4f 54 20 6c 63 4f 6c 64 |IF..IF N|OT lcOld|
|000020b0| 56 61 6c 75 65 3d 3d 53 | 45 54 28 74 68 69 73 2e |Value==S|ET(this.|
|000020c0| 63 53 65 74 43 6f 6d 6d | 61 6e 64 29 20 41 4e 44 |cSetComm|and) AND|
|000020d0| 20 3b 0d 0a 09 09 4e 4f | 54 20 74 68 69 73 2e 53 | ;....NO|T this.S|
|000020e0| 65 74 28 6c 63 4f 6c 64 | 56 61 6c 75 65 29 0d 0a |et(lcOld|Value)..|
|000020f0| 09 6c 6c 52 65 73 75 6c | 74 3d 2e 46 2e 0d 0a 45 |.llResul|t=.F...E|
|00002100| 4e 44 49 46 0d 0a 52 45 | 54 55 52 4e 20 6c 6c 52 |NDIF..RE|TURN llR|
|00002110| 65 73 75 6c 74 0d 0a 0d | 0a 45 4e 44 50 52 4f 43 |esult...|.ENDPROC|
|00002120| 0d 0a 50 52 4f 43 45 44 | 55 52 45 20 73 65 74 0d |..PROCED|URE set.|
|00002130| 0a 4c 50 41 52 41 4d 45 | 54 45 52 53 20 74 75 41 |.LPARAME|TERS tuA|
|00002140| 72 67 75 6d 65 6e 74 31 | 2c 74 75 41 72 67 75 6d |rgument1|,tuArgum|
|00002150| 65 6e 74 32 2c 74 6c 44 | 69 73 61 62 6c 65 52 65 |ent2,tlD|isableRe|
|00002160| 73 74 6f 72 65 0d 0a 4c | 4f 43 41 4c 20 6c 63 53 |store..L|OCAL lcS|
|00002170| 65 74 43 6f 6d 6d 61 6e | 64 2c 6c 63 54 79 70 65 |etComman|d,lcType|
|00002180| 31 2c 6c 63 54 79 70 65 | 32 2c 6c 63 43 6c 61 75 |1,lcType|2,lcClau|
|00002190| 73 65 73 0d 0a 0d 0a 74 | 68 69 73 2e 6c 45 72 72 |ses....t|his.lErr|
|000021a0| 6f 72 3d 2e 46 2e 0d 0a | 49 46 20 50 41 52 41 4d |or=.F...|IF PARAM|
|000021b0| 45 54 45 52 53 28 29 3d | 30 0d 0a 09 52 45 54 55 |ETERS()=|0...RETU|
|000021c0| 52 4e 20 2e 46 2e 0d 0a | 45 4e 44 49 46 0d 0a 6c |RN .F...|ENDIF..l|
|000021d0| 63 54 79 70 65 31 3d 54 | 59 50 45 28 22 74 75 41 |cType1=T|YPE("tuA|
|000021e0| 72 67 75 6d 65 6e 74 31 | 22 29 0d 0a 6c 63 54 79 |rgument1|")..lcTy|
|000021f0| 70 65 32 3d 54 59 50 45 | 28 22 74 75 41 72 67 75 |pe2=TYPE|("tuArgu|
|00002200| 6d 65 6e 74 32 22 29 0d | 0a 6c 63 53 65 74 43 6f |ment2").|.lcSetCo|
|00002210| 6d 6d 61 6e 64 3d 41 4c | 4c 54 52 49 4d 28 4c 45 |mmand=AL|LTRIM(LE|
|00002220| 46 54 28 74 68 69 73 2e | 63 53 65 74 43 6f 6d 6d |FT(this.|cSetComm|
|00002230| 61 6e 64 2c 34 29 29 0d | 0a 49 46 20 4e 4f 54 20 |and,4)).|.IF NOT |
|00002240| 49 53 4e 55 4c 4c 28 74 | 75 41 72 67 75 6d 65 6e |ISNULL(t|uArgumen|
|00002250| 74 32 29 20 41 4e 44 20 | 4e 4f 54 20 6c 63 54 79 |t2) AND |NOT lcTy|
|00002260| 70 65 32 3d 3d 22 4c 22 | 20 4f 52 20 74 75 41 72 |pe2=="L"| OR tuAr|
|00002270| 67 75 6d 65 6e 74 32 0d | 0a 09 49 46 20 6c 63 54 |gument2.|..IF lcT|
|00002280| 79 70 65 32 3d 3d 22 43 | 22 0d 0a 09 09 49 46 20 |ype2=="C|"....IF |
|00002290| 6c 63 53 65 74 43 6f 6d | 6d 61 6e 64 3d 3d 22 50 |lcSetCom|mand=="P|
|000022a0| 52 49 4e 22 20 41 4e 44 | 20 55 50 50 45 52 28 74 |RIN" AND| UPPER(t|
|000022b0| 75 41 72 67 75 6d 65 6e | 74 32 29 3d 3d 22 50 52 |uArgumen|t2)=="PR|
|000022c0| 4e 22 0d 0a 09 09 09 6c | 63 43 6c 61 75 73 65 73 |N".....l|cClauses|
|000022d0| 3d 22 20 54 4f 22 0d 0a | 09 09 45 4c 53 45 0d 0a |=" TO"..|..ELSE..|
|000022e0| 09 09 09 6c 63 43 6c 61 | 75 73 65 73 3d 22 20 54 |...lcCla|uses=" T|
|000022f0| 4f 20 5b 22 2b 74 75 41 | 72 67 75 6d 65 6e 74 32 |O ["+tuA|rgument2|
|00002300| 2b 22 5d 22 0d 0a 09 09 | 45 4e 44 49 46 0d 0a 09 |+"]"....|ENDIF...|
|00002310| 45 4c 53 45 0d 0a 09 09 | 6c 63 43 6c 61 75 73 65 |ELSE....|lcClause|
|00002320| 73 3d 22 20 54 4f 20 22 | 2b 41 4c 4c 54 52 49 4d |s=" TO "|+ALLTRIM|
|00002330| 28 53 54 52 28 74 75 41 | 72 67 75 6d 65 6e 74 32 |(STR(tuA|rgument2|
|00002340| 2c 39 29 29 0d 0a 09 45 | 4e 44 49 46 0d 0a 09 53 |,9))...E|NDIF...S|
|00002350| 45 54 20 26 6c 63 53 65 | 74 43 6f 6d 6d 61 6e 64 |ET &lcSe|tCommand|
|00002360| 20 26 6c 63 43 6c 61 75 | 73 65 73 0d 0a 45 4e 44 | &lcClau|ses..END|
|00002370| 49 46 0d 0a 49 46 20 4e | 4f 54 20 49 53 4e 55 4c |IF..IF N|OT ISNUL|
|00002380| 4c 28 74 75 41 72 67 75 | 6d 65 6e 74 31 29 20 41 |L(tuArgu|ment1) A|
|00002390| 4e 44 20 4e 4f 54 20 6c | 63 54 79 70 65 31 3d 3d |ND NOT l|cType1==|
|000023a0| 22 4c 22 20 4f 52 20 74 | 75 41 72 67 75 6d 65 6e |"L" OR t|uArgumen|
|000023b0| 74 31 0d 0a 09 49 46 20 | 6c 63 54 79 70 65 31 3d |t1...IF |lcType1=|
|000023c0| 3d 22 43 22 0d 0a 09 09 | 6c 63 43 6c 61 75 73 65 |="C"....|lcClause|
|000023d0| 73 3d 74 75 41 72 67 75 | 6d 65 6e 74 31 0d 0a 09 |s=tuArgu|ment1...|
|000023e0| 09 49 46 20 6c 63 53 65 | 74 43 6f 6d 6d 61 6e 64 |.IF lcSe|tCommand|
|000023f0| 3d 3d 22 43 4c 41 53 22 | 20 4f 52 20 6c 63 53 65 |=="CLAS"| OR lcSe|
|00002400| 74 43 6f 6d 6d 61 6e 64 | 3d 3d 22 43 4f 4c 4c 22 |tCommand|=="COLL"|
|00002410| 20 4f 52 20 3b 0d 0a 09 | 09 09 09 6c 63 53 65 74 | OR ;...|...lcSet|
|00002420| 43 6f 6d 6d 61 6e 64 3d | 3d 22 43 4f 56 45 22 20 |Command=|="COVE" |
|00002430| 4f 52 20 6c 63 53 65 74 | 43 6f 6d 6d 61 6e 64 3d |OR lcSet|Command=|
|00002440| 3d 22 44 41 54 41 22 20 | 4f 52 20 3b 0d 0a 09 09 |="DATA" |OR ;....|
|00002450| 09 09 6c 63 53 65 74 43 | 6f 6d 6d 61 6e 64 3d 3d |..lcSetC|ommand==|
|00002460| 22 44 45 46 41 22 20 4f | 52 20 6c 63 53 65 74 43 |"DEFA" O|R lcSetC|
|00002470| 6f 6d 6d 61 6e 64 3d 3d | 22 44 45 42 55 22 20 4f |ommand==|"DEBU" O|
|00002480| 52 20 3b 0d 0a 09 09 09 | 09 6c 63 53 65 74 43 6f |R ;.....|.lcSetCo|
|00002490| 6d 6d 61 6e 64 3d 3d 22 | 44 45 56 49 22 20 4f 52 |mmand=="|DEVI" OR|
|000024a0| 20 6c 63 53 65 74 43 6f | 6d 6d 61 6e 64 3d 3d 22 | lcSetCo|mmand=="|
|000024b0| 44 49 53 50 22 20 4f 52 | 20 3b 0d 0a 09 09 09 09 |DISP" OR| ;......|
|000024c0| 6c 63 53 65 74 43 6f 6d | 6d 61 6e 64 3d 3d 22 45 |lcSetCom|mand=="E|
|000024d0| 56 45 4e 22 20 4f 52 20 | 6c 63 53 65 74 43 6f 6d |VEN" OR |lcSetCom|
|000024e0| 6d 61 6e 64 3d 3d 22 46 | 49 4c 54 22 20 4f 52 20 |mand=="F|ILT" OR |
|000024f0| 3b 0d 0a 09 09 09 09 6c | 63 53 65 74 43 6f 6d 6d |;......l|cSetComm|
|00002500| 61 6e 64 3d 3d 22 46 4f | 52 4d 22 20 4f 52 20 6c |and=="FO|RM" OR l|
|00002510| 63 53 65 74 43 6f 6d 6d | 61 6e 64 3d 3d 22 49 4e |cSetComm|and=="IN|
|00002520| 44 45 22 20 4f 52 20 3b | 0d 0a 09 09 09 09 6c 63 |DE" OR ;|......lc|
|00002530| 53 65 74 43 6f 6d 6d 61 | 6e 64 3d 3d 22 4b 45 59 |SetComma|nd=="KEY|
|00002540| 22 20 4f 52 20 09 6c 63 | 53 65 74 43 6f 6d 6d 61 |" OR .lc|SetComma|
|00002550| 6e 64 3d 3d 22 4b 45 59 | 43 22 20 4f 52 20 3b 0d |nd=="KEY|C" OR ;.|
|00002560| 0a 09 09 09 09 6c 63 53 | 65 74 43 6f 6d 6d 61 6e |.....lcS|etComman|
|00002570| 64 3d 3d 22 4c 49 42 52 | 22 20 4f 52 20 6c 63 53 |d=="LIBR|" OR lcS|
|00002580| 65 74 43 6f 6d 6d 61 6e | 64 3d 3d 22 4d 41 43 4b |etComman|d=="MACK|
|00002590| 22 20 4f 52 20 3b 0d 0a | 09 09 09 09 6c 63 53 65 |" OR ;..|....lcSe|
|000025a0| 74 43 6f 6d 6d 61 6e 64 | 3d 3d 22 4d 41 52 4b 22 |tCommand|=="MARK"|
|000025b0| 20 4f 52 20 6c 63 53 65 | 74 43 6f 6d 6d 61 6e 64 | OR lcSe|tCommand|
|000025c0| 3d 3d 22 4d 45 53 53 22 | 20 4f 52 20 3b 0d 0a 09 |=="MESS"| OR ;...|
|000025d0| 09 09 09 6c 63 53 65 74 | 43 6f 6d 6d 61 6e 64 3d |...lcSet|Command=|
|000025e0| 3d 22 4e 4f 43 50 22 20 | 4f 52 20 6c 63 53 65 74 |="NOCP" |OR lcSet|
|000025f0| 43 6f 6d 6d 61 6e 64 3d | 3d 22 4f 52 44 45 22 20 |Command=|="ORDE" |
|00002600| 4f 52 20 3b 0d 0a 09 09 | 09 09 6c 63 53 65 74 43 |OR ;....|..lcSetC|
|00002610| 6f 6d 6d 61 6e 64 3d 3d | 22 50 41 54 48 22 20 4f |ommand==|"PATH" O|
|00002620| 52 20 6c 63 53 65 74 43 | 6f 6d 6d 61 6e 64 3d 3d |R lcSetC|ommand==|
|00002630| 22 50 44 53 45 22 20 4f | 52 20 3b 0d 0a 09 09 09 |"PDSE" O|R ;.....|
|00002640| 09 6c 63 53 65 74 43 6f | 6d 6d 61 6e 64 3d 3d 22 |.lcSetCo|mmand=="|
|00002650| 50 4f 49 4e 22 20 4f 52 | 20 6c 63 53 65 74 43 6f |POIN" OR| lcSetCo|
|00002660| 6d 6d 61 6e 64 3d 3d 22 | 50 52 4f 43 22 20 4f 52 |mmand=="|PROC" OR|
|00002670| 20 3b 0d 0a 09 09 09 09 | 6c 63 53 65 74 43 6f 6d | ;......|lcSetCom|
|00002680| 6d 61 6e 64 3d 3d 22 52 | 45 4c 41 22 20 4f 52 20 |mand=="R|ELA" OR |
|00002690| 6c 63 53 65 74 43 6f 6d | 6d 61 6e 64 3d 3d 22 53 |lcSetCom|mand=="S|
|000026a0| 45 50 41 22 20 4f 52 20 | 3b 0d 0a 09 09 09 09 6c |EPA" OR |;......l|
|000026b0| 63 53 65 74 43 6f 6d 6d | 61 6e 64 3d 3d 22 53 4b |cSetComm|and=="SK|
|000026c0| 49 50 22 20 4f 52 20 6c | 63 53 65 74 43 6f 6d 6d |IP" OR l|cSetComm|
|000026d0| 61 6e 64 3d 3d 22 54 4f | 50 49 22 20 4f 52 20 3b |and=="TO|PI" OR ;|
|000026e0| 0d 0a 09 09 09 09 6c 63 | 53 65 74 43 6f 6d 6d 61 |......lc|SetComma|
|000026f0| 6e 64 3d 3d 22 54 59 50 | 45 22 20 4f 52 20 6c 63 |nd=="TYP|E" OR lc|
|00002700| 53 65 74 43 6f 6d 6d 61 | 6e 64 3d 3d 22 55 44 46 |SetComma|nd=="UDF|
|00002710| 50 22 20 4f 52 20 3b 0d | 0a 09 09 09 09 6c 63 53 |P" OR ;.|.....lcS|
|00002720| 65 74 43 6f 6d 6d 61 6e | 64 3d 3d 22 58 43 4d 44 |etComman|d=="XCMD|
|00002730| 22 0d 0a 09 09 09 6c 63 | 43 6c 61 75 73 65 73 3d |".....lc|Clauses=|
|00002740| 22 20 54 4f 20 22 2b 6c | 63 43 6c 61 75 73 65 73 |" TO "+l|cClauses|
|00002750| 0d 0a 09 09 45 4e 44 49 | 46 0d 0a 09 45 4c 53 45 |....ENDI|F...ELSE|
|00002760| 0d 0a 09 09 6c 63 43 6c | 61 75 73 65 73 3d 22 20 |....lcCl|auses=" |
|00002770| 54 4f 20 22 2b 41 4c 4c | 54 52 49 4d 28 53 54 52 |TO "+ALL|TRIM(STR|
|00002780| 28 74 75 41 72 67 75 6d | 65 6e 74 31 2c 39 29 29 |(tuArgum|ent1,9))|
|00002790| 0d 0a 09 45 4e 44 49 46 | 0d 0a 09 53 45 54 20 26 |...ENDIF|...SET &|
|000027a0| 6c 63 53 65 74 43 6f 6d | 6d 61 6e 64 20 26 6c 63 |lcSetCom|mand &lc|
|000027b0| 43 6c 61 75 73 65 73 0d | 0a 45 4e 44 49 46 0d 0a |Clauses.|.ENDIF..|
|000027c0| 49 46 20 74 68 69 73 2e | 6c 45 72 72 6f 72 20 4f |IF this.|lError O|
|000027d0| 52 20 28 74 6c 44 69 73 | 61 62 6c 65 52 65 73 74 |R (tlDis|ableRest|
|000027e0| 6f 72 65 20 41 4e 44 20 | 4e 4f 54 20 74 68 69 73 |ore AND |NOT this|
|000027f0| 2e 44 69 73 61 62 6c 65 | 52 65 73 74 6f 72 65 28 |.Disable|Restore(|
|00002800| 29 29 0d 0a 09 52 45 54 | 55 52 4e 20 2e 46 2e 0d |))...RET|URN .F..|
|00002810| 0a 45 4e 44 49 46 0d 0a | 0d 0a 45 4e 44 50 52 4f |.ENDIF..|..ENDPRO|
|00002820| 43 0d 0a 50 52 4f 43 45 | 44 55 52 45 20 67 65 74 |C..PROCE|DURE get|
|00002830| 0d 0a 4c 50 41 52 41 4d | 45 54 45 52 53 20 74 6e |..LPARAM|ETERS tn|
|00002840| 41 72 67 75 6d 65 6e 74 | 0d 0a 4c 4f 43 41 4c 20 |Argument|..LOCAL |
|00002850| 6c 63 56 61 6c 75 65 2c | 6c 6c 41 64 6a 75 73 74 |lcValue,|llAdjust|
|00002860| 0d 0a 0d 0a 6c 6c 41 64 | 6a 75 73 74 3d 2e 46 2e |....llAd|just=.F.|
|00002870| 0d 0a 44 4f 20 43 41 53 | 45 0d 0a 09 43 41 53 45 |..DO CAS|E...CASE|
|00002880| 20 54 59 50 45 28 22 74 | 6e 41 72 67 75 6d 65 6e | TYPE("t|nArgumen|
|00002890| 74 22 29 23 22 4e 22 0d | 0a 09 09 6c 63 56 61 6c |t")#"N".|...lcVal|
|000028a0| 75 65 3d 74 68 69 73 2e | 43 68 65 63 6b 56 61 6c |ue=this.|CheckVal|
|000028b0| 75 65 28 53 45 54 28 74 | 68 69 73 2e 63 53 65 74 |ue(SET(t|his.cSet|
|000028c0| 43 6f 6d 6d 61 6e 64 29 | 29 0d 0a 09 43 41 53 45 |Command)|)...CASE|
|000028d0| 20 74 6e 41 72 67 75 6d | 65 6e 74 3d 30 0d 0a 09 | tnArgum|ent=0...|
|000028e0| 09 6c 63 56 61 6c 75 65 | 3d 74 68 69 73 2e 75 4f |.lcValue|=this.uO|
|000028f0| 6c 64 56 61 6c 75 65 0d | 0a 09 09 6c 6c 41 64 6a |ldValue.|...llAdj|
|00002900| 75 73 74 3d 2e 54 2e 0d | 0a 09 43 41 53 45 20 74 |ust=.T..|..CASE t|
|00002910| 6e 41 72 67 75 6d 65 6e | 74 3d 31 0d 0a 09 09 6c |nArgumen|t=1....l|
|00002920| 63 56 61 6c 75 65 3d 53 | 45 54 28 74 68 69 73 2e |cValue=S|ET(this.|
|00002930| 63 53 65 74 43 6f 6d 6d | 61 6e 64 2c 31 29 0d 0a |cSetComm|and,1)..|
|00002940| 09 43 41 53 45 20 74 6e | 41 72 67 75 6d 65 6e 74 |.CASE tn|Argument|
|00002950| 3d 32 0d 0a 09 09 6c 63 | 56 61 6c 75 65 3d 53 45 |=2....lc|Value=SE|
|00002960| 54 28 74 68 69 73 2e 63 | 53 65 74 43 6f 6d 6d 61 |T(this.c|SetComma|
|00002970| 6e 64 2c 32 29 0d 0a 09 | 43 41 53 45 20 74 6e 41 |nd,2)...|CASE tnA|
|00002980| 72 67 75 6d 65 6e 74 3d | 2d 31 0d 0a 09 09 6c 63 |rgument=|-1....lc|
|00002990| 56 61 6c 75 65 3d 74 68 | 69 73 2e 75 4f 6c 64 56 |Value=th|is.uOldV|
|000029a0| 61 6c 75 65 31 0d 0a 09 | 43 41 53 45 20 74 6e 41 |alue1...|CASE tnA|
|000029b0| 72 67 75 6d 65 6e 74 3d | 2d 32 0d 0a 09 09 6c 63 |rgument=|-2....lc|
|000029c0| 56 61 6c 75 65 3d 74 68 | 69 73 2e 75 4f 6c 64 56 |Value=th|is.uOldV|
|000029d0| 61 6c 75 65 32 0d 0a 09 | 4f 54 48 45 52 57 49 53 |alue2...|OTHERWIS|
|000029e0| 45 0d 0a 09 09 52 45 54 | 55 52 4e 20 2e 4e 55 4c |E....RET|URN .NUL|
|000029f0| 4c 2e 0d 0a 45 4e 44 43 | 41 53 45 0d 0a 52 45 54 |L...ENDC|ASE..RET|
|00002a00| 55 52 4e 20 6c 63 56 61 | 6c 75 65 0d 0a 0d 0a 45 |URN lcVa|lue....E|
|00002a10| 4e 44 50 52 4f 43 0d 0a | 50 52 4f 43 45 44 55 52 |NDPROC..|PROCEDUR|
|00002a20| 45 20 64 69 73 61 62 6c | 65 72 65 73 74 6f 72 65 |E disabl|erestore|
|00002a30| 0d 0a 74 68 69 73 2e 6c | 4e 6f 52 65 73 74 6f 72 |..this.l|NoRestor|
|00002a40| 65 3d 2e 54 2e 0d 0a 0d | 0a 45 4e 44 50 52 4f 43 |e=.T....|.ENDPROC|
|00002a50| 0d 0a 50 52 4f 43 45 44 | 55 52 45 20 63 68 65 63 |..PROCED|URE chec|
|00002a60| 6b 76 61 6c 75 65 0d 0a | 4c 50 41 52 41 4d 45 54 |kvalue..|LPARAMET|
|00002a70| 45 52 53 20 74 63 56 61 | 6c 75 65 0d 0a 0d 0a 49 |ERS tcVa|lue....I|
|00002a80| 46 20 54 59 50 45 28 22 | 74 63 56 61 6c 75 65 22 |F TYPE("|tcValue"|
|00002a90| 29 23 22 43 22 0d 0a 09 | 52 45 54 55 52 4e 20 74 |)#"C"...|RETURN t|
|00002aa0| 63 56 61 6c 75 65 0d 0a | 45 4e 44 49 46 0d 0a 49 |cValue..|ENDIF..I|
|00002ab0| 46 20 4c 45 46 54 28 74 | 68 69 73 2e 63 53 65 74 |F LEFT(t|his.cSet|
|00002ac0| 43 6f 6d 6d 61 6e 64 2c | 34 29 3d 3d 22 44 45 46 |Command,|4)=="DEF|
|00002ad0| 41 22 0d 0a 09 52 45 54 | 55 52 4e 20 74 63 56 61 |A"...RET|URN tcVa|
|00002ae0| 6c 75 65 2b 53 59 53 28 | 32 30 30 33 29 0d 0a 45 |lue+SYS(|2003)..E|
|00002af0| 4e 44 49 46 0d 0a 52 45 | 54 55 52 4e 20 74 63 56 |NDIF..RE|TURN tcV|
|00002b00| 61 6c 75 65 0d 0a 0d 0a | 45 4e 44 50 52 4f 43 0d |alue....|ENDPROC.|
|00002b10| 0a 50 52 4f 43 45 44 55 | 52 45 20 44 65 73 74 72 |.PROCEDU|RE Destr|
|00002b20| 6f 79 0d 0a 49 46 20 4e | 4f 54 20 74 68 69 73 2e |oy..IF N|OT this.|
|00002b30| 6c 4e 6f 52 65 73 74 6f | 72 65 0d 0a 09 52 45 54 |lNoResto|re...RET|
|00002b40| 55 52 4e 20 74 68 69 73 | 2e 52 65 73 74 6f 72 65 |URN this|.Restore|
|00002b50| 28 29 0d 0a 45 4e 44 49 | 46 0d 0a 0d 0a 45 4e 44 |()..ENDI|F....END|
|00002b60| 50 52 4f 43 0d 0a 50 52 | 4f 43 45 44 55 52 45 20 |PROC..PR|OCEDURE |
|00002b70| 49 6e 69 74 0d 0a 4c 50 | 41 52 41 4d 45 54 45 52 |Init..LP|ARAMETER|
|00002b80| 53 20 74 63 53 65 74 43 | 6f 6d 6d 61 6e 64 2c 74 |S tcSetC|ommand,t|
|00002b90| 75 41 72 67 75 6d 65 6e | 74 31 2c 74 75 41 72 67 |uArgumen|t1,tuArg|
|00002ba0| 75 6d 65 6e 74 32 2c 74 | 6c 44 69 73 61 62 6c 65 |ument2,t|lDisable|
|00002bb0| 52 65 73 74 6f 72 65 0d | 0a 4c 4f 43 41 4c 20 6c |Restore.|.LOCAL l|
|00002bc0| 6e 50 61 72 61 6d 65 74 | 65 72 73 0d 0a 0d 0a 6c |nParamet|ers....l|
|00002bd0| 6e 50 61 72 61 6d 65 74 | 65 72 73 3d 50 41 52 41 |nParamet|ers=PARA|
|00002be0| 4d 45 54 45 52 53 28 29 | 0d 0a 49 46 20 6c 6e 50 |METERS()|..IF lnP|
|00002bf0| 61 72 61 6d 65 74 65 72 | 73 3d 30 20 4f 52 20 45 |arameter|s=0 OR E|
|00002c00| 4d 50 54 59 28 74 63 53 | 65 74 43 6f 6d 6d 61 6e |MPTY(tcS|etComman|
|00002c10| 64 29 20 4f 52 20 49 53 | 4e 55 4c 4c 28 74 63 53 |d) OR IS|NULL(tcS|
|00002c20| 65 74 43 6f 6d 6d 61 6e | 64 29 20 4f 52 20 3b 0d |etComman|d) OR ;.|
|00002c30| 0a 09 09 54 59 50 45 28 | 22 74 63 53 65 74 43 6f |...TYPE(|"tcSetCo|
|00002c40| 6d 6d 61 6e 64 22 29 23 | 22 43 22 0d 0a 09 52 45 |mmand")#|"C"...RE|
|00002c50| 54 55 52 4e 0d 0a 45 4e | 44 49 46 0d 0a 74 68 69 |TURN..EN|DIF..thi|
|00002c60| 73 2e 6c 45 72 72 6f 72 | 3d 2e 46 2e 0d 0a 74 68 |s.lError|=.F...th|
|00002c70| 69 73 2e 63 53 65 74 43 | 6f 6d 6d 61 6e 64 3d 55 |is.cSetC|ommand=U|
|00002c80| 50 50 45 52 28 41 4c 4c | 54 52 49 4d 28 74 63 53 |PPER(ALL|TRIM(tcS|
|00002c90| 65 74 43 6f 6d 6d 61 6e | 64 29 29 0d 0a 74 68 69 |etComman|d))..thi|
|00002ca0| 73 2e 75 4f 6c 64 56 61 | 6c 75 65 3d 74 68 69 73 |s.uOldVa|lue=this|
|00002cb0| 2e 43 68 65 63 6b 56 61 | 6c 75 65 28 53 45 54 28 |.CheckVa|lue(SET(|
|00002cc0| 74 68 69 73 2e 63 53 65 | 74 43 6f 6d 6d 61 6e 64 |this.cSe|tCommand|
|00002cd0| 29 29 0d 0a 49 46 20 74 | 68 69 73 2e 6c 45 72 72 |))..IF t|his.lErr|
|00002ce0| 6f 72 0d 0a 09 52 45 54 | 55 52 4e 20 2e 46 2e 0d |or...RET|URN .F..|
|00002cf0| 0a 45 4e 44 49 46 0d 0a | 74 68 69 73 2e 75 4f 6c |.ENDIF..|this.uOl|
|00002d00| 64 56 61 6c 75 65 31 3d | 53 45 54 28 74 68 69 73 |dValue1=|SET(this|
|00002d10| 2e 63 53 65 74 43 6f 6d | 6d 61 6e 64 2c 31 29 0d |.cSetCom|mand,1).|
|00002d20| 0a 74 68 69 73 2e 75 4f | 6c 64 56 61 6c 75 65 32 |.this.uO|ldValue2|
|00002d30| 3d 53 45 54 28 74 68 69 | 73 2e 63 53 65 74 43 6f |=SET(thi|s.cSetCo|
|00002d40| 6d 6d 61 6e 64 2c 32 29 | 0d 0a 49 46 20 6c 6e 50 |mmand,2)|..IF lnP|
|00002d50| 61 72 61 6d 65 74 65 72 | 73 3e 3d 32 20 41 4e 44 |arameter|s>=2 AND|
|00002d60| 20 3b 0d 0a 09 09 4e 4f | 54 20 74 68 69 73 2e 53 | ;....NO|T this.S|
|00002d70| 65 74 28 74 75 41 72 67 | 75 6d 65 6e 74 31 2c 74 |et(tuArg|ument1,t|
|00002d80| 75 41 72 67 75 6d 65 6e | 74 32 2c 74 6c 44 69 73 |uArgumen|t2,tlDis|
|00002d90| 61 62 6c 65 52 65 73 74 | 6f 72 65 29 0d 0a 09 52 |ableRest|ore)...R|
|00002da0| 45 54 55 52 4e 20 2e 46 | 2e 0d 0a 45 4e 44 49 46 |ETURN .F|...ENDIF|
|00002db0| 0d 0a 0d 0a 45 4e 44 50 | 52 4f 43 0d 0a 50 52 4f |....ENDP|ROC..PRO|
|00002dc0| 43 45 44 55 52 45 20 45 | 72 72 6f 72 0d 0a 4c 50 |CEDURE E|rror..LP|
|00002dd0| 41 52 41 4d 45 54 45 52 | 53 20 6e 45 72 72 6f 72 |ARAMETER|S nError|
|00002de0| 2c 20 63 4d 65 74 68 6f | 64 2c 20 6e 4c 69 6e 65 |, cMetho|d, nLine|
|00002df0| 0d 0a 0d 0a 74 68 69 73 | 2e 6c 45 72 72 6f 72 3d |....this|.lError=|
|00002e00| 2e 54 2e 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |.T.....E|NDPROC..|
|00002e10| 00 00 00 01 00 00 00 5d | 63 73 65 74 63 6f 6d 6d |.......]|csetcomm|
|00002e20| 61 6e 64 20 3d 20 0d 0a | 75 6f 6c 64 76 61 6c 75 |and = ..|uoldvalu|
|00002e30| 65 20 3d 20 2e 4e 55 4c | 4c 2e 0d 0a 75 6f 6c 64 |e = .NUL|L...uold|
|00002e40| 76 61 6c 75 65 31 20 3d | 20 2e 4e 55 4c 4c 2e 0d |value1 =| .NULL..|
|00002e50| 0a 75 6f 6c 64 76 61 6c | 75 65 32 20 3d 20 2e 4e |.uoldval|ue2 = .N|
|00002e60| 55 4c 4c 2e 0d 0a 4e 61 | 6d 65 20 3d 20 22 5f 73 |ULL...Na|me = "_s|
|00002e70| 65 74 22 0d 0a 00 00 00 | 01 00 00 00 06 63 75 73 |et".....|.....cus|
|00002e80| 74 6f 6d 00 00 00 01 00 | 00 00 09 5f 62 61 73 65 |tom.....|..._base|
|00002e90| 2e 76 63 78 00 00 00 01 | 00 00 00 06 63 75 73 74 |.vcx....|....cust|
|00002ea0| 6f 6d 00 00 00 01 00 00 | 18 3b fe f2 ff 20 02 01 |om......|.;... ..|
|00002eb0| 00 00 00 22 18 00 00 22 | 18 00 00 00 00 00 00 00 |..."..."|........|
|00002ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ed0| 00 ae 8e 02 00 00 00 25 | 00 00 00 19 15 00 00 00 |.......%|........|
|00002ee0| 00 00 00 c9 17 00 00 48 | 01 00 00 39 15 00 00 00 |.......H|...9....|
|00002ef0| 00 00 00 00 00 00 00 fc | 03 00 03 00 55 00 00 3e |........|....U..>|
|00002f00| 12 0f 00 af f7 00 00 07 | f7 01 00 07 f7 02 00 fe |........|........|
|00002f10| 1b 00 ae f7 03 00 07 f7 | 04 00 07 f7 05 00 07 f7 |........|........|
|00002f20| 06 00 07 f7 07 00 07 f7 | 08 00 fe 1b 00 ae f7 09 |........|........|
|00002f30| 00 07 f7 0a 00 07 f7 0b | 00 07 f7 0c 00 07 f7 0d |........|........|
|00002f40| 00 07 f7 0e 00 fe 13 00 | ae f7 0f 00 07 f7 10 00 |........|........|
|00002f50| 07 f7 11 00 07 f7 12 00 | fe 13 00 ae f7 13 00 07 |........|........|
|00002f60| f7 14 00 07 f7 15 00 07 | f7 16 00 fe 1b 00 ae f7 |........|........|
|00002f70| 17 00 07 f7 18 00 07 f7 | 19 00 07 f7 1a 00 07 f7 |........|........|
|00002f80| 1b 00 07 f7 1c 00 fe 17 | 00 ae f7 1d 00 07 f7 1e |........|........|
|00002f90| 00 07 f7 1f 00 07 f7 20 | 00 07 f7 21 00 fe 2b 00 |....... |...!..+.|
|00002fa0| ae f6 22 00 fc f8 01 01 | fd 16 07 f6 23 00 fc f8 |..".....|....#...|
|00002fb0| 01 01 fd 16 07 f6 24 00 | fc f8 01 01 fd 16 07 f6 |......$.|........|
|00002fc0| 25 00 fc f8 01 01 fd 16 | fe 18 00 90 04 f7 00 00 |%.......|........|
|00002fd0| 07 f7 22 00 07 f7 23 00 | 07 f7 24 00 07 f7 25 00 |.."...#.|..$...%.|
|00002fe0| fe 15 00 25 fc 43 f7 02 | 00 ea d9 d9 01 00 43 14 |...%.C..|......C.|
|00002ff0| fd f9 05 04 01 fe 0f 00 | 54 f7 04 00 10 fc 43 f7 |........|T.....C.|
|00003000| 02 00 9b fd fe 08 00 1b | f9 05 2d 01 fe 21 00 54 |........|..-..!.T|
|00003010| f7 04 00 10 fc 43 f7 02 | 00 f2 0a 00 d9 04 00 3d |.....C..|.......=|
|00003020| 2e 46 2e f3 05 00 d9 02 | 00 5f 5f 36 fd fe 04 00 |.F......|.__6....|
|00003030| 1e fe 20 00 54 f7 05 00 | 10 fc 43 d9 0b 00 5f 5f |.. .T...|..C...__|
|00003040| 74 63 43 6f 64 65 5b 31 | 5d 62 d9 01 00 43 14 03 |tcCode[1|]b...C..|
|00003050| fd fe 0d 00 25 fc f7 05 | 00 fd f9 05 74 01 fe 16 |....%...|....t...|
|00003060| 00 54 f7 0f 00 10 fc 43 | eb f7 00 00 ea 19 f7 22 |.T.....C|......."|
|00003070| 00 ea 0d fd fe 08 00 1b | f9 05 91 05 fe 1e 00 25 |........|.......%|
|00003080| fc 43 f7 00 00 ea d9 d9 | 01 00 43 0f f1 06 00 43 |.C......|..C....C|
|00003090| f7 00 00 a1 0b fd f9 05 | 9e 01 fe 04 00 42 fe 04 |........|.....B..|
|000030a0| 00 1e fe 0d 00 25 fc f7 | 01 00 fd f9 05 c1 01 fe |.....%..|........|
|000030b0| 12 00 54 f7 03 00 10 fc | 43 43 f7 00 00 ea cc 9b |..T.....|CC......|
|000030c0| fd fe 08 00 1b f9 05 d8 | 01 fe 0f 00 54 f7 03 00 |........|....T...|
|000030d0| 10 fc 43 f7 00 00 9b fd | fe 04 00 1e fe 17 00 25 |..C.....|.......%|
|000030e0| fc 43 f7 03 00 f8 01 01 | 3d d9 01 00 3b 14 fd f9 |.C......|=...;...|
|000030f0| 05 11 02 fe 1e 00 54 f7 | 03 00 10 fc 43 f7 03 00 |......T.|....C...|
|00003100| d9 01 00 3b 43 f8 02 0d | 20 43 f8 02 0a 20 06 a8 |...;C...| C... ..|
|00003110| fd fe 04 00 1e fe 15 00 | 54 f7 0f 00 10 fc 43 ea |........|T.....C.|
|00003120| 19 f7 22 00 f7 03 00 ea | da fd fe 11 00 25 fc f7 |..".....|.....%..|
|00003130| 0f 00 f8 01 00 10 fd f9 | 05 3f 02 fe 04 00 42 fe |........|.?....B.|
|00003140| 04 00 1e fe 07 00 35 f7 | 26 00 fe 0d 00 54 f7 26 |......5.|&....T.&|
|00003150| 00 10 fc d9 00 00 fd fe | 0d 00 54 f7 07 00 10 fc |........|..T.....|
|00003160| f8 01 00 fd fe 12 00 18 | 2b fc f7 07 00 f7 0f 00 |........|+.......|
|00003170| 0d fd f9 05 8d 05 fe 11 | 00 54 f7 07 00 10 fc f7 |........|.T......|
|00003180| 07 00 f8 01 01 06 fd fe | 14 00 54 f7 06 00 10 fc |........|..T.....|
|00003190| 43 43 00 f7 07 00 f6 22 | 00 9b fd fe 18 00 54 f7 |CC....."|......T.|
|000031a0| 0c 00 10 fc 43 d9 01 00 | 26 d9 01 00 26 06 f7 06 |....C...|&...&...|
|000031b0| 00 1d fd fe 11 00 25 fc | f7 0c 00 f8 01 00 11 fd |......%.|........|
|000031c0| f9 05 dc 02 fe 18 00 54 | f7 06 00 10 fc 43 43 f7 |.......T|.....CC.|
|000031d0| 06 00 f7 0c 00 f8 01 01 | 08 3d 9b fd fe 04 00 1e |........|.=......|
|000031e0| fe 0c 00 18 2b fc 61 fd | f9 05 90 03 fe 12 00 54 |....+.a.|.......T|
|000031f0| f7 0b 00 10 fc 43 f7 06 | 00 f8 01 01 3d fd fe 1f |.....C..|....=...|
|00003200| 00 25 fc f7 0b 00 d9 01 | 00 20 14 f1 0a 00 f7 0b |.%......|. ......|
|00003210| 00 43 f8 01 09 20 14 0b | fd f9 05 35 03 fe 14 00 |.C... ..|...5....|
|00003220| 54 f7 06 00 10 fc 43 43 | f7 06 00 f8 01 02 5c 9b |T.....CC|......\.|
|00003230| fd fe 04 00 2e fe 04 00 | 1e fe 12 00 54 f7 0b 00 |........|....T...|
|00003240| 10 fc 43 f7 06 00 f8 01 | 01 52 fd fe 1f 00 25 fc |..C.....|.R....%.|
|00003250| f7 0b 00 d9 01 00 20 14 | f1 0a 00 f7 0b 00 43 f8 |...... .|......C.|
|00003260| 01 09 20 14 0b fd f9 05 | 88 03 fe 1a 00 54 f7 06 |.. .....|.....T..|
|00003270| 00 10 fc 43 43 f7 06 00 | 43 f7 06 00 3e f8 01 01 |...CC...|C...>...|
|00003280| 08 3d 60 fd fe 04 00 2e | fe 04 00 1e fe 04 00 21 |.=`.....|.......!|
|00003290| fe 04 00 1d fe 72 00 25 | fc 43 f7 06 00 a1 f1 0e |.....r.%|.C......|
|000032a0| 00 43 f7 06 00 f8 01 01 | 3d d9 01 00 2a 14 0b f1 |.C......|=...*...|
|000032b0| 0e 00 43 f7 06 00 f8 01 | 01 3d d9 01 00 23 14 0b |..C.....|.=...#..|
|000032c0| f1 14 00 43 f7 06 00 f8 | 01 02 3d d9 01 00 26 d9 |...C....|..=...&.|
|000032d0| 01 00 26 06 03 14 0b f1 | 13 00 43 43 f7 06 00 f8 |..&.....|..CC....|
|000032e0| 01 04 3d 66 d9 04 00 4e | 4f 54 45 14 0b f1 11 00 |..=f...N|OTE.....|
|000032f0| 43 f7 06 00 f8 01 04 3d | d9 04 00 3c 21 2d 2d 14 |C......=|...<!--.|
|00003300| 0b fd f9 05 49 04 fe 10 | 00 99 fc 43 eb f7 22 00 |....I...|...C..".|
|00003310| f7 07 00 ea 0f fd fe 11 | 00 54 f7 0f 00 10 fc f7 |........|.T......|
|00003320| 0f 00 f8 01 01 08 fd fe | 0d 00 15 f6 22 00 fc f7 |........|...."...|
|00003330| 0f 00 fd 16 fe 11 00 54 | f7 07 00 10 fc f7 07 00 |.......T|........|
|00003340| f8 01 01 08 fd fe 04 00 | 2e fe 04 00 1e fe 2a 00 |........|......*.|
|00003350| 25 fc f7 07 00 f8 01 02 | 12 f0 16 00 43 43 f7 07 |%.......|....CC..|
|00003360| 00 f8 01 01 08 f6 22 00 | f8 01 01 52 d9 01 00 3b |......".|...R...;|
|00003370| 14 09 fd f9 05 6e 05 fe | 28 00 54 f7 08 00 10 fc |.....n..|(.T.....|
|00003380| 43 43 f7 07 00 f8 01 01 | 08 f6 22 00 43 43 f7 07 |CC......|..".CC..|
|00003390| 00 f8 01 01 08 f6 22 00 | 3e f8 01 01 08 3d fd fe |......".|>....=..|
|000033a0| 0c 00 18 2b fc 61 fd f9 | 05 02 05 fe 12 00 54 f7 |...+.a..|......T.|
|000033b0| 0b 00 10 fc 43 f7 08 00 | f8 01 01 52 fd fe 1f 00 |....C...|...R....|
|000033c0| 25 fc f7 0b 00 d9 01 00 | 20 14 f1 0a 00 f7 0b 00 |%.......| .......|
|000033d0| 43 f8 01 09 20 14 0b fd | f9 05 fa 04 fe 1a 00 54 |C... ...|.......T|
|000033e0| f7 08 00 10 fc 43 43 f7 | 08 00 43 f7 08 00 3e f8 |.....CC.|..C...>.|
|000033f0| 01 01 08 3d 60 fd fe 04 | 00 2e fe 04 00 1e fe 04 |...=`...|........|
|00003400| 00 21 fe 04 00 1d fe 11 | 00 54 f7 07 00 10 fc f7 |.!......|.T......|
|00003410| 07 00 f8 01 01 08 fd fe | 16 00 54 f7 06 00 10 fc |........|..T.....|
|00003420| f7 08 00 d9 01 00 20 06 | f7 06 00 06 fd fe 10 00 |...... .|........|
|00003430| 99 fc 43 eb f7 22 00 f7 | 07 00 ea 0f fd fe 11 00 |..C.."..|........|
|00003440| 54 f7 0f 00 10 fc f7 0f | 00 f8 01 01 08 fd fe 0d |T.......|........|
|00003450| 00 15 f6 22 00 fc f7 0f | 00 fd 16 fe 13 00 54 f6 |..."....|......T.|
|00003460| 22 00 fc f7 07 00 fd 16 | 10 fc f7 06 00 fd fe 08 |".......|........|
|00003470| 00 1b f9 05 89 05 fe 13 | 00 54 f6 22 00 fc f7 07 |........|.T."....|
|00003480| 00 fd 16 10 fc f7 06 00 | fd fe 04 00 1e fe 04 00 |........|........|
|00003490| 1d fe 04 00 1e fe 11 00 | 25 fc f7 0f 00 f8 01 00 |........|%.......|
|000034a0| 10 fd f9 05 aa 05 fe 04 | 00 42 fe 04 00 1e fe 15 |........|.B......|
|000034b0| 00 54 f7 11 00 10 fc 43 | d9 05 00 45 52 52 4f 52 |.T.....C|...ERROR|
|000034c0| ea 18 fd fe 0d 00 18 48 | f9 05 d0 05 f9 05 44 06 |.......H|......D.|
|000034d0| fe 13 00 0c fc f7 04 00 | d9 02 00 5f 5f 14 fd f9 |........|...__...|
|000034e0| 05 eb 05 fe 08 00 7b 10 | fb 00 00 fe 15 00 0c fc |......{.|........|
|000034f0| f7 04 00 d9 04 00 3d 2e | 46 2e 14 fd f9 05 0c 06 |......=.|F.......|
|00003500| fe 0c 00 31 10 fb 04 00 | 3d 2e 46 2e fe 0f 00 0c |...1....|=.F.....|
|00003510| fc 43 f7 04 00 a1 fd f9 | 05 23 06 fe 08 00 7b 10 |.C......|.#....{.|
|00003520| fb 00 00 fe 08 00 32 f9 | 05 44 06 fe 19 00 01 4f |......2.|.D.....O|
|00003530| 4e 20 45 52 52 4f 52 20 | 26 5f 5f 6c 63 4f 6e 45 |N ERROR |&__lcOnE|
|00003540| 72 72 6f 72 0a 04 00 1c | fe 0b 00 54 f7 12 00 10 |rror....|...T....|
|00003550| fc 61 fd fe 0d 00 54 f7 | 06 00 10 fc d9 00 00 fd |.a....T.|........|
|00003560| fe 0f 00 4a fc 2d fd 28 | f7 1e 00 07 f7 10 00 fe |...J.-.(|........|
|00003570| 15 00 4a fc d9 00 00 fd | 28 f7 13 00 07 f7 17 00 |..J.....|(.......|
|00003580| 07 f7 1d 00 fe 39 00 4a | fc f8 01 00 fd 28 f7 07 |.....9.J|.....(..|
|00003590| 00 07 f7 14 00 07 f7 15 | 00 07 f7 16 00 07 f7 1a |........|........|
|000035a0| 00 07 f7 1b 00 07 f7 1c | 00 07 f7 18 00 07 f7 19 |........|........|
|000035b0| 00 07 f7 1f 00 07 f7 20 | 00 07 f7 21 00 fe 12 00 |....... |...!....|
|000035c0| 18 2b fc f7 07 00 f7 0f | 00 0d fd f9 05 ee 11 fe |.+......|........|
|000035d0| 11 00 54 f7 07 00 10 fc | f7 07 00 f8 01 01 06 fd |..T.....|........|
|000035e0| fe 12 00 54 f7 06 00 10 | fc 43 00 f7 07 00 f6 22 |...T....|.C....."|
|000035f0| 00 fd fe 0f 00 25 fc 43 | f7 06 00 a1 fd f9 05 05 |.....%.C|........|
|00003600| 07 fe 04 00 2e fe 04 00 | 1e fe 17 00 25 fc 43 f7 |........|....%.C.|
|00003610| 06 00 f8 01 01 3d d9 01 | 00 3d 14 fd f9 05 34 07 |.....=..|.=....4.|
|00003620| fe 10 00 99 fc 43 43 f7 | 06 00 f8 01 02 5c ce fd |.....CC.|.....\..|
|00003630| fe 04 00 2e fe 04 00 1e | fe 14 00 54 f7 09 00 10 |........|...T....|
|00003640| fc 43 43 f7 06 00 f8 01 | 04 3d 66 fd fe 4a 00 25 |.CC.....|.=f..J.%|
|00003650| fc f7 09 00 d9 04 00 44 | 4f 20 57 14 f0 32 00 43 |.......D|O W..2.C|
|00003660| 43 f7 06 00 f8 01 08 3d | 66 d9 08 00 44 4f 20 57 |C......=|f...DO W|
|00003670| 48 49 4c 20 14 f1 17 00 | 43 43 f7 06 00 f8 01 08 |HIL ....|CC......|
|00003680| 3d 66 d9 08 00 44 4f 20 | 57 48 49 4c 45 14 0b 03 |=f...DO |WHILE...|
|00003690| 09 fd f9 05 b4 07 fe 11 | 00 54 f7 09 00 10 fc d9 |........|.T......|
|000036a0| 04 00 44 4f 5f 57 fd fe | 0d 00 54 f7 0e 00 10 fc |..DO_W..|..T.....|
|000036b0| f8 01 02 fd fe 08 00 1b | f9 05 c9 07 fe 0d 00 54 |........|.......T|
|000036c0| f7 0e 00 10 fc f8 01 01 | fd fe 04 00 1e fe 16 00 |........|........|
|000036d0| 54 f7 0c 00 10 fc 43 d9 | 01 00 20 f7 09 00 f7 0e |T.....C.|.. .....|
|000036e0| 00 1d fd fe 17 00 54 f7 | 0d 00 10 fc 43 43 f8 01 |......T.|....CC..|
|000036f0| 09 20 f7 09 00 f7 0e 00 | 1d fd fe 15 00 25 fc 43 |. ......|.....%.C|
|00003700| f7 0d 00 f8 01 01 f7 0c | 00 ab fd f9 05 1c 08 fe |........|........|
|00003710| 0d 00 54 f7 0c 00 10 fc | f7 0d 00 fd fe 04 00 1e |..T.....|........|
|00003720| fe 11 00 25 fc f7 0c 00 | f8 01 00 11 fd f9 05 47 |...%....|.......G|
|00003730| 08 fe 16 00 54 f7 09 00 | 10 fc 43 f7 09 00 f7 0c |....T...|..C.....|
|00003740| 00 f8 01 01 08 3d fd fe | 04 00 1e fe 16 00 54 f7 |.....=..|......T.|
|00003750| 0c 00 10 fc 43 d9 01 00 | 20 f7 06 00 f7 0e 00 1d |....C...| .......|
|00003760| fd fe 17 00 54 f7 0d 00 | 10 fc 43 43 f8 01 09 20 |....T...|..CC... |
|00003770| f7 06 00 f7 0e 00 1d fd | fe 15 00 25 fc 43 f7 0d |........|...%.C..|
|00003780| 00 f8 01 01 f7 0c 00 ab | fd f9 05 9a 08 fe 0d 00 |........|........|
|00003790| 54 f7 0c 00 10 fc f7 0d | 00 fd fe 04 00 1e fe 11 |T.......|........|
|000037a0| 00 25 fc f7 0c 00 f8 01 | 00 10 fd f9 05 bc 08 fe |.%......|........|
|000037b0| 0d 00 54 f7 0a 00 10 fc | d9 00 00 fd fe 08 00 1b |..T.....|........|
|000037c0| f9 05 dc 08 fe 18 00 54 | f7 0a 00 10 fc 43 43 f7 |.......T|.....CC.|
|000037d0| 06 00 f7 0c 00 f8 01 01 | 06 5c 9b fd fe 04 00 1e |........|.\......|
|000037e0| fe 0d 00 54 f7 26 00 10 | fc f7 06 00 fd fe 0d 00 |...T.&..|........|
|000037f0| 18 48 f9 05 fa 08 f9 05 | 27 10 fe 15 00 0c fc f7 |.H......|'.......|
|00003800| 09 00 d9 04 00 45 58 49 | 54 14 fd f9 05 2b 09 fe |.....EXI|T....+..|
|00003810| 0d 00 25 fc f7 05 00 fd | f9 05 23 09 fe 07 00 42 |..%.....|..#....B|
|00003820| fc 2d fd fe 04 00 1e fe | 04 00 2e fe 15 00 0c fc |.-......|........|
|00003830| f7 09 00 d9 04 00 45 4e | 44 54 14 fd f9 05 4f 09 |......EN|DT....O.|
|00003840| fe 0b 00 54 f7 10 00 10 | fc 2d fd fe 04 00 2e fe |...T....|.-......|
|00003850| 0d 00 0c fc f7 10 00 fd | f9 05 8c 09 fe 12 00 54 |........|.......T|
|00003860| f7 06 00 10 fc d9 01 00 | 5c f7 06 00 06 fd fe 0d |........|\.......|
|00003870| 00 54 f7 26 00 10 fc f7 | 06 00 fd fe 0d 00 01 26 |.T.&....|.......&|
|00003880| 5f 5f 6c 63 4c 69 6e 65 | 0a 04 00 2e fe 15 00 0c |__lcLine|........|
|00003890| fc f7 09 00 d9 04 00 44 | 4f 5f 57 14 fd f9 05 fb |.......D|O_W.....|
|000038a0| 09 fe 11 00 54 f7 16 00 | 10 fc f7 16 00 f8 01 01 |....T...|........|
|000038b0| 06 fd fe 27 00 25 fc f7 | 16 00 f8 01 01 10 f0 08 |...'.%..|........|
|000038c0| 00 f7 1c 00 f8 01 00 10 | 09 f0 08 00 f7 21 00 f8 |........|.....!..|
|000038d0| 01 00 10 09 fd f9 05 f7 | 09 fe 0d 00 54 f7 13 00 |........|....T...|
|000038e0| 10 fc f7 0a 00 fd fe 0d | 00 54 f7 14 00 10 fc f7 |........|.T......|
|000038f0| 07 00 fd fe 04 00 2e fe | 04 00 1e fe 14 00 0c fc |........|........|
|00003900| f7 09 00 d9 03 00 46 4f | 52 14 fd f9 05 c4 0b fe |......FO|R.......|
|00003910| 11 00 54 f7 1c 00 10 fc | f7 1c 00 f8 01 01 06 fd |..T.....|........|
|00003920| fe 27 00 25 fc f7 16 00 | f8 01 00 10 f0 08 00 f7 |.'.%....|........|
|00003930| 16 00 f8 01 00 10 09 f0 | 08 00 f7 21 00 f8 01 00 |........|...!....|
|00003940| 10 09 fd f9 05 c0 0b fe | 16 00 54 f7 0c 00 10 fc |........|..T.....|
|00003950| 43 d9 04 00 20 54 4f 20 | f7 0a 00 b8 fd fe 11 00 |C... TO |........|
|00003960| 25 fc f7 0c 00 f8 01 00 | 10 fd f9 05 99 0a fe 0d |%.......|........|
|00003970| 00 54 f7 17 00 10 fc d9 | 00 00 fd fe 0d 00 54 f7 |.T......|......T.|
|00003980| 18 00 10 fc f8 01 00 fd | fe 0d 00 54 f7 19 00 10 |........|...T....|
|00003990| fc f8 01 00 fd fe 04 00 | 2e fe 04 00 1e fe 0d 00 |........|........|
|000039a0| 54 f7 17 00 10 fc f7 0a | 00 fd fe 18 00 54 f7 17 |T.......|.....T..|
|000039b0| 00 10 fc 43 43 f7 0a 00 | f7 0c 00 f8 01 01 08 3d |...CC...|.......=|
|000039c0| 9b fd fe 18 00 54 f7 0a | 00 10 fc 43 43 f7 0a 00 |.....T..|...CC...|
|000039d0| f7 0c 00 f8 01 04 06 5c | 9b fd fe 13 00 54 f7 0c |.......\|.....T..|
|000039e0| 00 10 fc 43 d9 01 00 3d | f7 17 00 b8 fd fe 11 00 |...C...=|........|
|000039f0| 25 fc f7 0c 00 f8 01 00 | 10 fd f9 05 02 0b fe 04 |%.......|........|
|00003a00| 00 2e fe 04 00 1e fe 10 | 00 01 26 5f 5f 6c 63 46 |........|..&__lcF|
|00003a10| 6f 72 45 78 70 72 0a 18 | 00 54 f7 17 00 10 fc 43 |orExpr..|.T.....C|
|00003a20| 43 f7 17 00 f7 0c 00 f8 | 01 01 08 3d 9b fd fe 18 |C.......|...=....|
|00003a30| 00 54 f7 0c 00 10 fc 43 | d9 06 00 20 53 54 45 50 |.T.....C|... STEP|
|00003a40| 20 f7 0a 00 b8 fd fe 11 | 00 25 fc f7 0c 00 f8 01 | .......|.%......|
|00003a50| 00 10 fd f9 05 73 0b fe | 0f 00 54 f7 18 00 10 fc |.....s..|..T.....|
|00003a60| 43 f7 0a 00 ce fd fe 0d | 00 54 f7 19 00 10 fc f8 |C.......|.T......|
|00003a70| 01 01 fd fe 08 00 1b f9 | 05 ab 0b fe 18 00 54 f7 |........|......T.|
|00003a80| 18 00 10 fc 43 43 f7 0a | 00 f7 0c 00 f8 01 01 08 |....CC..|........|
|00003a90| 3d ce fd fe 18 00 54 f7 | 19 00 10 fc 43 43 f7 0a |=.....T.|....CC..|
|00003aa0| 00 f7 0c 00 f8 01 06 06 | 5c ce fd fe 04 00 1e fe |........|\.......|
|00003ab0| 0d 00 54 f7 1a 00 10 fc | f7 07 00 fd fe 04 00 2e |..T.....|........|
|00003ac0| fe 04 00 1e fe 13 00 0c | fc f7 09 00 d9 02 00 49 |........|.......I|
|00003ad0| 46 14 fd f9 05 40 0c fe | 11 00 54 f7 21 00 10 fc |F....@..|..T.!...|
|00003ae0| f7 21 00 f8 01 01 06 fd | fe 27 00 25 fc f7 21 00 |.!......|.'.%..!.|
|00003af0| f8 01 01 10 f0 08 00 f7 | 16 00 f8 01 00 10 09 f0 |........|........|
|00003b00| 08 00 f7 1c 00 f8 01 00 | 10 09 fd f9 05 3c 0c fe |........|.....<..|
|00003b10| 0d 00 54 f7 1d 00 10 fc | f7 0a 00 fd fe 0f 00 54 |..T.....|.......T|
|00003b20| f7 1e 00 10 fc 43 f7 1d | 00 ce fd fe 0d 00 54 f7 |.....C..|......T.|
|00003b30| 1f 00 10 fc f7 07 00 fd | fe 04 00 2e fe 04 00 1e |........|........|
|00003b40| fe 15 00 0c fc f7 09 00 | d9 04 00 45 4c 53 45 14 |........|...ELSE.|
|00003b50| fd f9 05 93 0c fe 27 00 | 25 fc f7 21 00 f8 01 01 |......'.|%..!....|
|00003b60| 10 f0 08 00 f7 16 00 f8 | 01 00 10 09 f0 08 00 f7 |........|........|
|00003b70| 1c 00 f8 01 00 10 09 fd | f9 05 8f 0c fe 0f 00 54 |........|.......T|
|00003b80| f7 1e 00 10 fc f7 1e 00 | 0a 03 fd fe 04 00 2e fe |........|........|
|00003b90| 04 00 1e fe 15 00 0c fc | f7 09 00 d9 04 00 45 4e |........|......EN|
|00003ba0| 44 44 14 fd f9 05 bf 0d | fe 11 00 54 f7 16 00 10 |DD......|...T....|
|00003bb0| fc f7 16 00 f8 01 01 08 | fd fe 27 00 25 fc f7 16 |........|..'.%...|
|00003bc0| 00 f8 01 00 10 f0 08 00 | f7 1c 00 f8 01 00 10 09 |........|........|
|00003bd0| f0 08 00 f7 21 00 f8 01 | 00 10 09 fd f9 05 bb 0d |....!...|........|
|00003be0| fe 1a 00 18 2b fc 43 f7 | 13 00 a1 0a f0 06 00 43 |....+.C.|.......C|
|00003bf0| f7 13 00 ce 09 fd f9 05 | 69 0d fe 17 00 54 f7 12 |........|i....T..|
|00003c00| 00 10 fc 43 18 f7 25 00 | 2d 00 f7 02 00 f6 27 00 |...C..%.|-.....'.|
|00003c10| fd fe 13 00 25 fc 43 43 | f8 01 01 f6 25 00 d1 fd |....%.CC|....%...|
|00003c20| f9 05 4f 0d fe 0d 00 25 | fc f7 05 00 fd f9 05 42 |..O....%|.......B|
|00003c30| 0d fe 11 00 54 f6 00 00 | fc f8 01 01 fd 16 10 fc |....T...|........|
|00003c40| e4 fd fe 04 00 1e fe 09 | 00 42 fc f7 12 00 fd fe |........|.B......|
|00003c50| 04 00 1e fe 0e 00 25 fc | f7 12 00 0a fd f9 05 65 |......%.|.......e|
|00003c60| 0d fe 04 00 21 fe 04 00 | 1e fe 04 00 1d fe 0d 00 |....!...|........|
|00003c70| 54 f7 13 00 10 fc d9 00 | 00 fd fe 0b 00 54 f7 28 |T.......|.....T.(|
|00003c80| 00 10 fc 2d fd fe 0d 00 | 54 f7 14 00 10 fc f8 01 |...-....|T.......|
|00003c90| 00 fd fe 0d 00 15 f6 25 | 00 fc f8 01 01 fd 16 fe |.......%|........|
|00003ca0| 0b 00 54 f7 25 00 10 fc | 2d fd fe 0d 00 54 f7 15 |..T.%...|-....T..|
|00003cb0| 00 10 fc f8 01 00 fd fe | 04 00 2e fe 04 00 1e fe |........|........|
|00003cc0| 15 00 0c fc f7 09 00 d9 | 04 00 45 4e 44 46 14 fd |........|..ENDF..|
|00003cd0| f9 05 2f 0f fe 11 00 54 | f7 1c 00 10 fc f7 1c 00 |../....T|........|
|00003ce0| f8 01 01 08 fd fe 27 00 | 25 fc f7 16 00 f8 01 00 |......'.|%.......|
|00003cf0| 10 f0 08 00 f7 1c 00 f8 | 01 00 10 09 f0 08 00 f7 |........|........|
|00003d00| 21 00 f8 01 00 10 09 fd | f9 05 2b 0f fe 14 00 18 |!.......|..+.....|
|00003d10| 2b fc 43 f7 17 00 ce f7 | 18 00 0e fd f9 05 bd 0e |+.C.....|........|
|00003d20| fe 17 00 54 f7 12 00 10 | fc 43 18 f7 23 00 2d 00 |...T....|.C..#.-.|
|00003d30| f7 02 00 f6 27 00 fd fe | 13 00 25 fc 43 43 f8 01 |....'...|..%.CC..|
|00003d40| 01 f6 23 00 d1 fd f9 05 | 75 0e fe 0d 00 25 fc f7 |..#.....|u....%..|
|00003d50| 05 00 fd f9 05 68 0e fe | 11 00 54 f6 00 00 fc f8 |.....h..|..T.....|
|00003d60| 01 01 fd 16 10 fc e4 fd | fe 04 00 1e fe 09 00 42 |........|.......B|
|00003d70| fc f7 12 00 fd fe 04 00 | 1e fe 0e 00 25 fc f7 12 |........|....%...|
|00003d80| 00 0a fd f9 05 8b 0e fe | 04 00 21 fe 04 00 1e fe |........|..!.....|
|00003d90| 21 00 54 f7 0a 00 10 fc | f7 17 00 d9 01 00 3d 06 |!.T.....|......=.|
|00003da0| f7 17 00 06 d9 01 00 2b | 06 43 f7 19 00 5f 06 fd |.......+|.C..._..|
|00003db0| fe 0d 00 01 26 5f 5f 6c | 63 45 78 70 72 0a 04 00 |....&__l|cExpr...|
|00003dc0| 1d fe 0d 00 54 f7 17 00 | 10 fc d9 00 00 fd fe 0d |....T...|........|
|00003dd0| 00 54 f7 29 00 10 fc f8 | 01 00 fd fe 0d 00 54 f7 |.T.)....|......T.|
|00003de0| 18 00 10 fc f8 01 00 fd | fe 0d 00 54 f7 19 00 10 |........|...T....|
|00003df0| fc f8 01 00 fd fe 0d 00 | 54 f7 1a 00 10 fc f8 01 |........|T.......|
|00003e00| 00 fd fe 0d 00 15 f6 23 | 00 fc f8 01 01 fd 16 fe |.......#|........|
|00003e10| 0b 00 54 f7 23 00 10 fc | 2d fd fe 0d 00 54 f7 1b |..T.#...|-....T..|
|00003e20| 00 10 fc f8 01 00 fd fe | 04 00 2e fe 04 00 1e fe |........|........|
|00003e30| 15 00 0c fc f7 09 00 d9 | 04 00 45 4e 44 49 14 fd |........|..ENDI..|
|00003e40| f9 05 27 10 fe 11 00 54 | f7 21 00 10 fc f7 21 00 |..'....T|.!....!.|
|00003e50| f8 01 01 08 fd fe 27 00 | 25 fc f7 21 00 f8 01 00 |......'.|%..!....|
|00003e60| 10 f0 08 00 f7 16 00 f8 | 01 00 10 09 f0 08 00 f7 |........|........|
|00003e70| 1c 00 f8 01 00 10 09 fd | f9 05 23 10 fe 17 00 54 |........|..#....T|
|00003e80| f7 12 00 10 fc 43 18 f7 | 24 00 2d 00 f7 02 00 f6 |.....C..|$.-.....|
|00003e90| 27 00 fd fe 13 00 25 fc | 43 43 f8 01 01 f6 24 00 |'.....%.|CC....$.|
|00003ea0| d1 fd f9 05 d1 0f fe 0d | 00 25 fc f7 05 00 fd f9 |........|.%......|
|00003eb0| 05 c4 0f fe 11 00 54 f6 | 00 00 fc f8 01 01 fd 16 |......T.|........|
|00003ec0| 10 fc e4 fd fe 04 00 1e | fe 09 00 42 fc f7 12 00 |........|...B....|
|00003ed0| fd fe 04 00 1e fe 0d 00 | 54 f7 1d 00 10 fc d9 00 |........|T.......|
|00003ee0| 00 fd fe 0b 00 54 f7 1e | 00 10 fc 2d fd fe 0d 00 |.....T..|...-....|
|00003ef0| 54 f7 1f 00 10 fc f8 01 | 00 fd fe 0d 00 15 f6 24 |T.......|.......$|
|00003f00| 00 fc f8 01 01 fd 16 fe | 0b 00 54 f7 24 00 10 fc |........|..T.$...|
|00003f10| 2d fd fe 0d 00 54 f7 20 | 00 10 fc f8 01 00 fd fe |-....T. |........|
|00003f20| 04 00 2e fe 04 00 1e fe | 04 00 1c fe 11 00 25 fc |........|......%.|
|00003f30| f7 16 00 f8 01 00 11 fd | f9 05 71 10 fe 11 00 54 |........|..q....T|
|00003f40| f7 15 00 10 fc f7 15 00 | f8 01 01 06 fd fe 0d 00 |........|........|
|00003f50| 15 f6 25 00 fc f7 15 00 | fd 16 fe 13 00 54 f6 25 |..%.....|.....T.%|
|00003f60| 00 fc f7 15 00 fd 16 10 | fc f7 06 00 fd fe 04 00 |........|........|
|00003f70| 2e fe 04 00 1e fe 1c 00 | 25 fc f7 1c 00 f8 01 00 |........|%.......|
|00003f80| 11 f0 08 00 f7 16 00 f8 | 01 00 10 09 fd f9 05 c6 |........|........|
|00003f90| 10 fe 11 00 54 f7 1b 00 | 10 fc f7 1b 00 f8 01 01 |....T...|........|
|00003fa0| 06 fd fe 0d 00 15 f6 23 | 00 fc f7 1b 00 fd 16 fe |.......#|........|
|00003fb0| 13 00 54 f6 23 00 fc f7 | 1b 00 fd 16 10 fc f7 06 |..T.#...|........|
|00003fc0| 00 fd fe 04 00 2e fe 04 | 00 1e fe 11 00 25 fc f7 |........|.....%..|
|00003fd0| 21 00 f8 01 00 11 fd f9 | 05 26 11 fe 0e 00 25 fc |!.......|.&....%.|
|00003fe0| f7 1e 00 0a fd f9 05 ed | 10 fe 04 00 2e fe 04 00 |........|........|
|00003ff0| 1e fe 11 00 54 f7 20 00 | 10 fc f7 20 00 f8 01 01 |....T. .|... ....|
|00004000| 06 fd fe 0d 00 15 f6 24 | 00 fc f7 20 00 fd 16 fe |.......$|... ....|
|00004010| 13 00 54 f6 24 00 fc f7 | 20 00 fd 16 10 fc f7 06 |..T.$...| .......|
|00004020| 00 fd fe 04 00 2e fe 04 | 00 1e fe 0d 00 18 48 f9 |........|......H.|
|00004030| 05 37 11 f9 05 dd 11 fe | 15 00 0c fc f7 09 00 d9 |.7......|........|
|00004040| 04 00 52 45 54 55 14 fd | f9 05 95 11 fe 0d 00 25 |..RETU..|.......%|
|00004050| fc f7 05 00 fd f9 05 6a | 11 fe 11 00 54 f6 00 00 |.......j|....T...|
|00004060| fc f8 01 01 fd 16 10 fc | e4 fd fe 04 00 1e fe 10 |........|........|
|00004070| 00 25 fc 43 f7 0a 00 a1 | 0a fd f9 05 8d 11 fe 0f |.%.C....|........|
|00004080| 00 54 f7 12 00 10 fc 43 | f7 0a 00 ce fd fe 04 00 |.T.....C|........|
|00004090| 1e fe 04 00 21 fe 15 00 | 0c fc f7 09 00 d9 04 00 |....!...|........|
|000040a0| 54 45 58 54 14 fd f9 05 | b9 11 fe 0b 00 54 f7 10 |TEXT....|.....T..|
|000040b0| 00 10 fc 61 fd fe 04 00 | 2e fe 15 00 0c fc f7 09 |...a....|........|
|000040c0| 00 d9 04 00 45 4e 44 54 | 14 fd f9 05 dd 11 fe 0b |....ENDT|........|
|000040d0| 00 54 f7 10 00 10 fc 2d | fd fe 04 00 2e fe 04 00 |.T.....-|........|
|000040e0| 1c fe 0d 00 01 26 5f 5f | 6c 63 4c 69 6e 65 0a 04 |.....&__|lcLine..|
|000040f0| 00 1d fe 0f 00 25 fc 43 | f7 11 00 a1 fd f9 05 09 |.....%.C|........|
|00004100| 12 fe 08 00 7b 10 fb 00 | 00 fe 08 00 1b f9 05 2e |....{...|........|
|00004110| 12 fe 1d 00 01 4f 4e 20 | 45 52 52 4f 52 20 26 5f |.....ON |ERROR &_|
|00004120| 5f 6c 63 4c 61 73 74 4f | 6e 45 72 72 6f 72 0a 04 |_lcLastO|nError..|
|00004130| 00 1e fe 09 00 42 fc f7 | 12 00 fd fe 03 00 55 2a |.....B..|......U*|
|00004140| 00 08 00 5f 5f 54 43 43 | 4f 44 45 08 00 5f 5f 54 |...__TCC|ODE..__T|
|00004150| 4c 46 49 4c 45 10 00 5f | 5f 54 56 49 47 4e 4f 52 |LFILE.._|_TVIGNOR|
|00004160| 45 45 52 52 4f 52 53 08 | 00 5f 5f 4c 43 43 4f 44 |EERRORS.|.__LCCOD|
|00004170| 45 0b 00 5f 5f 4c 43 4f | 4e 45 52 52 4f 52 0d 00 |E..__LCO|NERROR..|
|00004180| 5f 5f 4c 4c 41 52 52 41 | 59 43 4f 44 45 08 00 5f |__LLARRA|YCODE.._|
|00004190| 5f 4c 43 4c 49 4e 45 08 | 00 5f 5f 4c 4e 4c 49 4e |_LCLINE.|.__LNLIN|
|000041a0| 45 09 00 5f 5f 4c 43 4c | 49 4e 45 32 0b 00 5f 5f |E..__LCL|INE2..__|
|000041b0| 4c 43 43 4f 4d 4d 41 4e | 44 08 00 5f 5f 4c 43 45 |LCCOMMAN|D..__LCE|
|000041c0| 58 50 52 08 00 5f 5f 4c | 43 43 48 41 52 09 00 5f |XPR..__L|CCHAR.._|
|000041d0| 5f 4c 4e 41 54 50 4f 53 | 0a 00 5f 5f 4c 4e 41 54 |_LNATPOS|..__LNAT|
|000041e0| 50 4f 53 32 0e 00 5f 5f | 4c 4e 4f 43 43 55 52 52 |POS2..__|LNOCCURR|
|000041f0| 45 4e 43 45 0d 00 5f 5f | 4c 4e 4c 49 4e 45 54 4f |ENCE..__|LNLINETO|
|00004200| 54 41 4c 0c 00 5f 5f 4c | 4c 54 45 58 54 4d 4f 44 |TAL..__L|LTEXTMOD|
|00004210| 45 0f 00 5f 5f 4c 43 4c | 41 53 54 4f 4e 45 52 52 |E..__LCL|ASTONERR|
|00004220| 4f 52 0a 00 5f 5f 4c 56 | 52 45 53 55 4c 54 0a 00 |OR..__LV|RESULT..|
|00004230| 5f 5f 4c 43 44 4f 45 58 | 50 52 0a 00 5f 5f 4c 4e |__LCDOEX|PR..__LN|
|00004240| 44 4f 4c 49 4e 45 0f 00 | 5f 5f 4c 4e 44 4f 4c 49 |DOLINE..|__LNDOLI|
|00004250| 4e 45 54 4f 54 41 4c 10 | 00 5f 5f 4c 4e 44 4f 53 |NETOTAL.|.__LNDOS|
|00004260| 54 41 43 4b 43 4f 55 4e | 54 0b 00 5f 5f 4c 43 46 |TACKCOUN|T..__LCF|
|00004270| 4f 52 45 58 50 52 0a 00 | 5f 5f 4c 4e 46 4f 52 4d |OREXPR..|__LNFORM|
|00004280| 41 58 0b 00 5f 5f 4c 4e | 46 4f 52 53 54 45 50 0b |AX..__LN|FORSTEP.|
|00004290| 00 5f 5f 4c 4e 46 4f 52 | 4c 49 4e 45 10 00 5f 5f |.__LNFOR|LINE..__|
|000042a0| 4c 4e 46 4f 52 4c 49 4e | 45 54 4f 54 41 4c 11 00 |LNFORLIN|ETOTAL..|
|000042b0| 5f 5f 4c 4e 46 4f 52 53 | 54 41 43 4b 43 4f 55 4e |__LNFORS|TACKCOUN|
|000042c0| 54 0a 00 5f 5f 4c 43 49 | 46 45 58 50 52 0a 00 5f |T..__LCI|FEXPR.._|
|000042d0| 5f 4c 4c 49 46 45 58 50 | 52 0a 00 5f 5f 4c 4e 49 |_LLIFEXP|R..__LNI|
|000042e0| 46 4c 49 4e 45 0f 00 5f | 5f 4c 4e 49 46 4c 49 4e |FLINE.._|_LNIFLIN|
|000042f0| 45 54 4f 54 41 4c 10 00 | 5f 5f 4c 4e 49 46 53 54 |ETOTAL..|__LNIFST|
|00004300| 41 43 4b 43 4f 55 4e 54 | 09 00 5f 5f 4c 41 4c 49 |ACKCOUNT|..__LALI|
|00004310| 4e 45 53 0c 00 5f 5f 4c | 41 46 4f 52 4c 49 4e 45 |NES..__L|AFORLINE|
|00004320| 53 0b 00 5f 5f 4c 41 49 | 46 4c 49 4e 45 53 0b 00 |S..__LAI|FLINES..|
|00004330| 5f 5f 4c 41 44 4f 4c 49 | 4e 45 53 0c 00 5f 5f 4c |__LADOLI|NES..__L|
|00004340| 43 4c 41 53 54 4c 49 4e | 45 07 00 52 55 4e 43 4f |CLASTLIN|E..RUNCO|
|00004350| 44 45 0a 00 5f 5f 4c 4c | 44 4f 45 58 50 52 0c 00 |DE..__LL|DOEXPR..|
|00004360| 5f 5f 4c 4e 46 4f 52 43 | 4f 55 4e 54 4f 00 0f 00 |__LNFORC|OUNTO...|
|00004370| af f7 00 00 07 f7 01 00 | 07 f7 02 00 fe 10 00 25 |........|.......%|
|00004380| fc f4 03 00 f7 04 00 fd | f9 05 26 00 fe 07 00 42 |........|..&....B|
|00004390| fc 2d fd fe 04 00 1e fe | 15 00 99 fc 43 00 f7 00 |.-......|....C...|
|000043a0| 00 00 f7 01 00 00 f7 02 | 00 ea a1 fd fe 04 00 42 |........|.......B|
|000043b0| fe 09 00 a8 fc f7 00 00 | fd fe 03 00 55 05 00 06 |........|....U...|
|000043c0| 00 4e 45 52 52 4f 52 07 | 00 43 4d 45 54 48 4f 44 |.NERROR.|.CMETHOD|
|000043d0| 05 00 4e 4c 49 4e 45 04 | 00 54 48 49 53 0d 00 4c |..NLINE.|.THIS..L|
|000043e0| 49 47 4e 4f 52 45 45 52 | 52 4f 52 53 07 00 72 75 |IGNOREER|RORS..ru|
|000043f0| 6e 63 6f 64 65 2c 00 00 | 00 00 00 ff ff 05 00 45 |ncode,..|.......E|
|00004400| 72 72 6f 72 99 14 00 00 | 00 00 ff ff 31 00 30 01 |rror....|....1.0.|
|00004410| f1 00 b1 01 b1 01 31 01 | 31 01 b1 01 71 01 b1 02 |......1.|1...q...|
|00004420| 81 01 57 01 f1 00 81 00 | 11 02 41 00 01 02 d1 00 |..W.....|..A.....|
|00004430| 61 01 81 00 e1 01 41 00 | 41 00 d1 00 21 01 81 00 |a.....A.|A...!...|
|00004440| f1 00 41 00 71 01 e1 01 | 41 00 51 01 11 01 41 00 |..A.q...|A.Q...A.|
|00004450| 41 00 71 00 d1 00 d1 00 | 21 01 11 01 41 01 81 01 |A.q.....|!...A...|
|00004460| 11 01 81 01 41 00 c1 00 | 21 01 f1 01 41 01 41 00 |....A...|!...A.A.|
|00004470| 41 00 21 01 f1 01 a1 01 | 41 00 41 00 41 00 41 00 |A.!.....|A.A.A.A.|
|00004480| 23 07 01 01 11 01 d1 00 | 11 01 41 00 41 00 a1 02 |#.......|..A.A...|
|00004490| 81 02 c1 00 21 01 f1 01 | a1 01 41 00 41 00 41 00 |....!...|..A.A.A.|
|000044a0| 41 00 11 01 61 01 01 01 | 11 01 d1 00 31 01 81 00 |A...a...|....1...|
|000044b0| 31 01 41 00 41 00 41 00 | 11 01 41 00 41 00 51 01 |1.A.A.A.|..A.A.Q.|
|000044c0| d1 00 31 01 81 00 51 01 | c1 00 f1 00 81 00 81 00 |..1...Q.|........|
|000044d0| 91 01 41 00 b1 00 d1 00 | f1 00 51 01 93 03 21 01 |..A.....|..Q...!.|
|000044e0| 11 01 21 01 f1 00 41 00 | 41 00 71 01 01 01 41 00 |..!...A.|A.q...A.|
|000044f0| 41 00 41 01 a2 04 11 01 | d1 00 81 00 d1 00 41 00 |A.A.....|......A.|
|00004500| 61 01 71 01 51 01 d1 00 | 41 00 11 01 61 01 41 00 |a.q.Q...|A...a.A.|
|00004510| 61 01 71 01 51 01 d1 00 | 41 00 11 01 d1 00 81 00 |a.q.Q...|A.......|
|00004520| 81 01 41 00 d1 00 d1 00 | 51 01 d1 00 71 00 41 00 |..A.....|Q...q.A.|
|00004530| 41 00 51 01 b1 00 41 00 | d1 00 21 01 d1 00 d1 00 |A.Q...A.|..!.....|
|00004540| 41 00 51 01 11 01 71 02 | d1 00 d1 00 41 00 41 00 |A.Q...q.|....A.A.|
|00004550| 41 01 11 01 71 02 61 01 | 11 01 d1 00 d1 00 d1 00 |A...q.a.|........|
|00004560| 41 00 41 00 d1 00 81 01 | 81 01 31 01 11 01 41 00 |A.A.....|..1...A.|
|00004570| 41 00 01 01 81 01 81 01 | 11 01 f1 00 d1 00 81 00 |A.......|........|
|00004580| 81 01 81 01 41 00 d1 00 | 41 00 41 00 31 01 11 01 |....A...|A.A.1...|
|00004590| 71 02 d1 00 f1 00 d1 00 | 41 00 41 00 51 01 71 02 |q.......|A.A.Q.q.|
|000045a0| f1 00 41 00 41 00 51 01 | 11 01 71 02 a1 01 71 01 |..A.A.Q.|..q...q.|
|000045b0| 31 01 d1 00 11 01 41 00 | 91 00 41 00 e1 00 41 00 |1.....A.|..A...A.|
|000045c0| 41 00 41 00 d1 00 b1 00 | d1 00 d1 00 b1 00 d1 00 |A.A.....|........|
|000045d0| 41 00 41 00 51 01 11 01 | 71 02 41 01 71 01 31 01 |A.A.Q...|q.A.q.1.|
|000045e0| d1 00 11 01 41 00 91 00 | 41 00 e1 00 41 00 41 00 |....A...|A...A.A.|
|000045f0| 11 02 d1 00 41 00 d1 00 | d1 00 d1 00 d1 00 d1 00 |....A...|........|
|00004600| d1 00 b1 00 d1 00 41 00 | 41 00 51 01 11 01 71 02 |......A.|A.Q...q.|
|00004610| 71 01 31 01 d1 00 11 01 | 41 00 91 00 41 00 d1 00 |q.1.....|A...A...|
|00004620| b1 00 d1 00 d1 00 b1 00 | d1 00 41 00 41 00 41 00 |........|..A.A.A.|
|00004630| 11 01 11 01 d1 00 31 01 | 41 00 41 00 c1 01 11 01 |......1.|A.A.....|
|00004640| d1 00 31 01 41 00 41 00 | 11 01 e1 00 41 00 41 00 |..1.A.A.|....A.A.|
|00004650| 11 01 d1 00 31 01 41 00 | 41 00 d1 00 51 01 d1 00 |....1.A.|A...Q...|
|00004660| 11 01 41 00 01 01 f1 00 | 41 00 41 00 51 01 b1 00 |..A.....|A.A.Q...|
|00004670| 41 00 51 01 b1 00 41 00 | 41 00 d1 00 41 00 f1 00 |A.Q...A.|A...A...|
|00004680| 81 00 81 00 d1 01 41 00 | 91 00 33 00 f1 00 02 01 |......A.|..3.....|
|00004690| 71 00 41 00 51 01 41 00 | 91 00 32 00 00 00 00 00 |q.A.Q.A.|..2.....|
|000046a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|000046b0| 13 00 00 00 75 24 00 00 | 01 00 00 00 40 01 00 00 |....u$..|....@...|
|000046c0| 91 24 00 00 1b 25 00 00 | 5f 01 00 00 00 29 00 00 |.$...%..|_....)..|
|000046d0| 00 22 18 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |."......|........|
|000046e0| 00 00 00 00 00 00 00 00 | 01 00 00 00 13 4e 61 6d |........|.....Nam|
|000046f0| 65 20 3d 20 22 5f 72 75 | 6e 63 6f 64 65 22 0d 0a |e = "_ru|ncode"..|
|00004700| 00 00 00 01 00 00 00 9b | 2a 73 68 65 6c 6c 65 78 |........|*shellex|
|00004710| 65 63 75 74 65 20 52 75 | 6e 73 20 53 68 65 6c 6c |ecute Ru|ns Shell|
|00004720| 45 78 65 63 75 74 65 20 | 41 50 49 20 72 6f 75 74 |Execute |API rout|
|00004730| 69 6e 65 2c 20 77 68 69 | 63 68 20 69 73 20 73 69 |ine, whi|ch is si|
|00004740| 6d 6c 61 72 20 74 6f 20 | 64 6f 75 62 6c 65 2d 63 |mlar to |double-c|
|00004750| 6c 69 63 6b 69 6e 67 20 | 66 69 6c 65 20 69 6e 20 |licking |file in |
|00004760| 65 78 70 6c 6f 72 65 72 | 2e 20 20 50 61 72 61 6d |explorer|. Param|
|00004770| 65 74 65 72 73 3a 20 28 | 63 46 69 6c 65 4e 61 6d |eters: (|cFileNam|
|00004780| 65 2c 20 63 57 6f 72 6b | 44 69 72 2c 20 63 4f 70 |e, cWork|Dir, cOp|
|00004790| 65 72 61 74 69 6f 6e 2c | 20 63 50 61 72 61 6d 73 |eration,| cParams|
|000047a0| 29 0d 0a 00 00 00 01 00 | 00 00 3a 4f 70 65 6e 73 |).......|..:Opens|
|000047b0| 20 61 20 66 69 6c 65 20 | 69 6e 20 74 68 65 20 61 | a file |in the a|
|000047c0| 70 70 6c 69 63 61 74 69 | 6f 6e 20 74 68 61 74 20 |pplicati|on that |
|000047d0| 69 74 27 73 20 61 73 73 | 6f 63 69 61 74 65 64 20 |it's ass|ociated |
|000047e0| 77 69 74 68 2e 00 00 00 | 01 00 00 25 26 50 52 4f |with....|...%&PRO|
|000047f0| 43 45 44 55 52 45 20 72 | 75 6e 63 6f 64 65 0d 0a |CEDURE r|uncode..|
|00004800| 2a 20 52 75 6e 43 6f 64 | 65 2e 50 52 47 20 2d 20 |* RunCod|e.PRG - |
|00004810| 52 75 6e 20 63 6f 64 65 | 20 62 6c 6f 63 6b 20 69 |Run code| block i|
|00004820| 6e 74 65 72 70 72 65 74 | 65 72 2e 0d 0a 2a 0d 0a |nterpret|er...*..|
|00004830| 2a 20 43 6f 70 79 72 69 | 67 68 74 20 28 63 29 20 |* Copyri|ght (c) |
|00004840| 31 39 39 38 20 4d 69 63 | 72 6f 73 6f 66 74 20 43 |1998 Mic|rosoft C|
|00004850| 6f 72 70 2e 0d 0a 2a 20 | 31 20 4d 69 63 72 6f 73 |orp...* |1 Micros|
|00004860| 6f 66 74 20 57 61 79 0d | 0a 2a 20 52 65 64 6d 6f |oft Way.|.* Redmo|
|00004870| 6e 64 2c 20 57 41 20 39 | 38 30 35 32 0d 0a 2a 0d |nd, WA 9|8052..*.|
|00004880| 0a 2a 20 44 65 73 63 72 | 69 70 74 69 6f 6e 3a 0d |.* Descr|iption:.|
|00004890| 0a 2a 20 52 75 6e 73 20 | 61 20 62 6c 6f 63 6b 20 |.* Runs |a block |
|000048a0| 6f 66 20 56 46 50 20 63 | 6f 64 65 20 76 69 61 20 |of VFP c|ode via |
|000048b0| 6d 61 63 72 6f 73 20 77 | 69 74 68 6f 75 74 20 63 |macros w|ithout c|
|000048c0| 6f 6d 70 69 6c 61 74 69 | 6f 6e 2e 0d 0a 2a 0d 0a |ompilati|on...*..|
|000048d0| 2a 20 50 61 72 61 6d 65 | 74 65 72 20 6c 69 73 74 |* Parame|ter list|
|000048e0| 3a 0d 0a 2a 20 63 43 6f | 64 65 3a 09 43 6f 64 65 |:..* cCo|de:.Code|
|000048f0| 20 74 6f 20 65 78 65 63 | 75 74 65 20 6f 72 20 66 | to exec|ute or f|
|00004900| 69 6c 65 20 6e 61 6d 65 | 20 74 68 61 74 20 63 6f |ile name| that co|
|00004910| 6e 74 61 69 6e 73 20 63 | 6f 64 65 20 74 6f 20 65 |ntains c|ode to e|
|00004920| 78 65 63 75 74 65 0d 0a | 2a 20 6c 46 69 6c 65 3a |xecute..|* lFile:|
|00004930| 09 53 70 65 63 69 66 69 | 65 73 20 73 6f 75 72 63 |.Specifi|es sourc|
|00004940| 65 20 66 69 6c 65 20 6d | 6f 64 65 2e 0d 0a 2a 09 |e file m|ode...*.|
|00004950| 09 09 09 2e 46 2e 2f 45 | 6d 70 74 79 20 3d 20 43 |....F./E|mpty = C|
|00004960| 6f 64 65 20 69 73 20 73 | 70 65 63 69 66 69 65 64 |ode is s|pecified|
|00004970| 20 62 79 20 63 43 6f 64 | 65 2e 0d 0a 2a 09 09 09 | by cCod|e...*...|
|00004980| 09 2e 54 2e 20 3d 20 43 | 6f 64 65 20 69 73 20 69 |..T. = C|ode is i|
|00004990| 6d 70 6f 72 74 65 64 20 | 66 72 6f 6d 20 73 70 65 |mported |from spe|
|000049a0| 63 69 66 69 65 64 20 66 | 69 6c 65 20 76 69 61 20 |cified f|ile via |
|000049b0| 63 43 6f 64 65 20 76 61 | 6c 75 65 2e 0d 0a 2a 20 |cCode va|lue...* |
|000049c0| 6c 49 67 6e 6f 72 65 45 | 72 72 6f 72 73 3a 09 53 |lIgnoreE|rrors:.S|
|000049d0| 70 65 63 69 66 69 65 73 | 20 65 72 72 6f 72 20 68 |pecifies| error h|
|000049e0| 61 6e 64 6c 69 6e 67 20 | 6d 6f 64 65 2e 0d 0a 2a |andling |mode...*|
|000049f0| 09 09 09 09 2e 46 2e 2f | 45 6d 70 74 79 20 3d 20 |.....F./|Empty = |
|00004a00| 45 72 72 6f 72 73 20 61 | 72 65 20 74 72 61 70 70 |Errors a|re trapp|
|00004a10| 65 64 20 61 6e 64 20 64 | 69 73 70 6c 61 79 65 64 |ed and d|isplayed|
|00004a20| 20 69 6e 20 61 20 77 61 | 69 74 20 77 69 6e 64 6f | in a wa|it windo|
|00004a30| 77 2e 0d 0a 2a 09 09 09 | 09 2e 54 2e 20 3d 20 41 |w...*...|..T. = A|
|00004a40| 6c 6c 20 65 72 72 6f 72 | 73 20 61 72 65 20 69 67 |ll error|s are ig|
|00004a50| 6e 6f 72 65 64 2e 0d 0a | 0d 0a 0d 0a 4c 50 41 52 |nored...|....LPAR|
|00004a60| 41 4d 45 54 45 52 53 20 | 5f 5f 74 63 43 6f 64 65 |AMETERS |__tcCode|
|00004a70| 2c 5f 5f 74 6c 46 69 6c | 65 2c 5f 5f 74 76 49 67 |,__tlFil|e,__tvIg|
|00004a80| 6e 6f 72 65 45 72 72 6f | 72 73 0d 0a 4c 4f 43 41 |noreErro|rs..LOCA|
|00004a90| 4c 20 5f 5f 6c 63 43 6f | 64 65 2c 5f 5f 6c 63 4f |L __lcCo|de,__lcO|
|00004aa0| 6e 45 72 72 6f 72 2c 5f | 5f 6c 6c 41 72 72 61 79 |nError,_|_llArray|
|00004ab0| 43 6f 64 65 2c 5f 5f 6c | 63 4c 69 6e 65 2c 5f 5f |Code,__l|cLine,__|
|00004ac0| 6c 6e 4c 69 6e 65 2c 5f | 5f 6c 63 4c 69 6e 65 32 |lnLine,_|_lcLine2|
|00004ad0| 0d 0a 4c 4f 43 41 4c 20 | 5f 5f 6c 63 43 6f 6d 6d |..LOCAL |__lcComm|
|00004ae0| 61 6e 64 2c 5f 5f 6c 63 | 45 78 70 72 2c 5f 5f 6c |and,__lc|Expr,__l|
|00004af0| 63 43 68 61 72 2c 5f 5f | 6c 6e 41 74 50 6f 73 2c |cChar,__|lnAtPos,|
|00004b00| 5f 5f 6c 6e 41 74 50 6f | 73 32 2c 5f 5f 6c 6e 4f |__lnAtPo|s2,__lnO|
|00004b10| 63 63 75 72 72 65 6e 63 | 65 0d 0a 4c 4f 43 41 4c |ccurrenc|e..LOCAL|
|00004b20| 20 5f 5f 6c 6e 4c 69 6e | 65 54 6f 74 61 6c 2c 5f | __lnLin|eTotal,_|
|00004b30| 5f 6c 6c 54 65 78 74 4d | 6f 64 65 2c 5f 5f 6c 63 |_llTextM|ode,__lc|
|00004b40| 4c 61 73 74 4f 6e 45 72 | 72 6f 72 2c 5f 5f 6c 76 |LastOnEr|ror,__lv|
|00004b50| 52 65 73 75 6c 74 0d 0a | 4c 4f 43 41 4c 20 5f 5f |Result..|LOCAL __|
|00004b60| 6c 63 44 6f 45 78 70 72 | 2c 5f 5f 6c 6e 44 6f 4c |lcDoExpr|,__lnDoL|
|00004b70| 69 6e 65 2c 5f 5f 6c 6e | 44 6f 4c 69 6e 65 54 6f |ine,__ln|DoLineTo|
|00004b80| 74 61 6c 2c 5f 5f 6c 6e | 44 6f 53 74 61 63 6b 43 |tal,__ln|DoStackC|
|00004b90| 6f 75 6e 74 0d 0a 4c 4f | 43 41 4c 20 5f 5f 6c 63 |ount..LO|CAL __lc|
|00004ba0| 46 6f 72 45 78 70 72 2c | 5f 5f 6c 6e 46 6f 72 4d |ForExpr,|__lnForM|
|00004bb0| 61 78 2c 5f 5f 6c 6e 46 | 6f 72 53 74 65 70 2c 5f |ax,__lnF|orStep,_|
|00004bc0| 5f 6c 6e 46 6f 72 4c 69 | 6e 65 2c 5f 5f 6c 6e 46 |_lnForLi|ne,__lnF|
|00004bd0| 6f 72 4c 69 6e 65 54 6f | 74 61 6c 2c 5f 5f 6c 6e |orLineTo|tal,__ln|
|00004be0| 46 6f 72 53 74 61 63 6b | 43 6f 75 6e 74 0d 0a 4c |ForStack|Count..L|
|00004bf0| 4f 43 41 4c 20 5f 5f 6c | 63 49 66 45 78 70 72 2c |OCAL __l|cIfExpr,|
|00004c00| 5f 5f 6c 6c 49 66 45 78 | 70 72 2c 5f 5f 6c 6e 49 |__llIfEx|pr,__lnI|
|00004c10| 66 4c 69 6e 65 2c 5f 5f | 6c 6e 49 66 4c 69 6e 65 |fLine,__|lnIfLine|
|00004c20| 54 6f 74 61 6c 2c 5f 5f | 6c 6e 49 66 53 74 61 63 |Total,__|lnIfStac|
|00004c30| 6b 43 6f 75 6e 74 0d 0a | 4c 4f 43 41 4c 20 5f 5f |kCount..|LOCAL __|
|00004c40| 6c 61 4c 69 6e 65 73 5b | 31 5d 2c 5f 5f 6c 61 46 |laLines[|1],__laF|
|00004c50| 6f 72 4c 69 6e 65 73 5b | 31 5d 2c 5f 5f 6c 61 49 |orLines[|1],__laI|
|00004c60| 66 4c 69 6e 65 73 5b 31 | 5d 2c 5f 5f 6c 61 44 6f |fLines[1|],__laDo|
|00004c70| 4c 69 6e 65 73 5b 31 5d | 0d 0a 45 58 54 45 52 4e |Lines[1]|..EXTERN|
|00004c80| 41 4c 20 41 52 52 41 59 | 20 5f 5f 74 63 43 6f 64 |AL ARRAY| __tcCod|
|00004c90| 65 2c 5f 5f 6c 61 4c 69 | 6e 65 73 2c 5f 5f 6c 61 |e,__laLi|nes,__la|
|00004ca0| 46 6f 72 4c 69 6e 65 73 | 2c 5f 5f 6c 61 49 66 4c |ForLines|,__laIfL|
|00004cb0| 69 6e 65 73 2c 5f 5f 6c | 61 44 6f 4c 69 6e 65 73 |ines,__l|aDoLines|
|00004cc0| 0d 0a 0d 0a 23 44 45 46 | 49 4e 45 20 54 41 42 09 |....#DEF|INE TAB.|
|00004cd0| 09 43 48 52 28 39 29 0d | 0a 23 44 45 46 49 4e 45 |.CHR(9).|.#DEFINE|
|00004ce0| 20 4c 46 09 09 43 48 52 | 28 31 30 29 0d 0a 23 44 | LF..CHR|(10)..#D|
|00004cf0| 45 46 49 4e 45 20 43 52 | 09 09 43 48 52 28 31 33 |EFINE CR|..CHR(13|
|00004d00| 29 0d 0a 23 44 45 46 49 | 4e 45 20 43 52 5f 4c 46 |)..#DEFI|NE CR_LF|
|00004d10| 09 43 52 2b 4c 46 0d 0a | 0d 0a 49 46 20 56 41 52 |.CR+LF..|..IF VAR|
|00004d20| 54 59 50 45 28 5f 5f 74 | 76 49 67 6e 6f 72 65 45 |TYPE(__t|vIgnoreE|
|00004d30| 72 72 6f 72 73 29 3d 3d | 22 43 22 0d 0a 09 5f 5f |rrors)==|"C"...__|
|00004d40| 6c 63 4f 6e 45 72 72 6f | 72 3d 41 4c 4c 54 52 49 |lcOnErro|r=ALLTRI|
|00004d50| 4d 28 5f 5f 74 76 49 67 | 6e 6f 72 65 45 72 72 6f |M(__tvIg|noreErro|
|00004d60| 72 73 29 0d 0a 45 4c 53 | 45 0d 0a 09 5f 5f 6c 63 |rs)..ELS|E...__lc|
|00004d70| 4f 6e 45 72 72 6f 72 3d | 49 49 46 28 5f 5f 74 76 |OnError=|IIF(__tv|
|00004d80| 49 67 6e 6f 72 65 45 72 | 72 6f 72 73 2c 22 3d 2e |IgnoreEr|rors,"=.|
|00004d90| 46 2e 22 2c 22 5f 5f 22 | 29 0d 0a 45 4e 44 49 46 |F.","__"|)..ENDIF|
|00004da0| 0d 0a 5f 5f 6c 6c 41 72 | 72 61 79 43 6f 64 65 3d |..__llAr|rayCode=|
|00004db0| 28 54 59 50 45 28 22 5f | 5f 74 63 43 6f 64 65 5b |(TYPE("_|_tcCode[|
|00004dc0| 31 5d 22 29 3d 3d 22 43 | 22 29 0d 0a 49 46 20 5f |1]")=="C|")..IF _|
|00004dd0| 5f 6c 6c 41 72 72 61 79 | 43 6f 64 65 0d 0a 09 5f |_llArray|Code..._|
|00004de0| 5f 6c 6e 4c 69 6e 65 54 | 6f 74 61 6c 3d 41 43 4f |_lnLineT|otal=ACO|
|00004df0| 50 59 28 5f 5f 74 63 43 | 6f 64 65 2c 5f 5f 6c 61 |PY(__tcC|ode,__la|
|00004e00| 4c 69 6e 65 73 29 0d 0a | 45 4c 53 45 0d 0a 09 49 |Lines)..|ELSE...I|
|00004e10| 46 20 56 41 52 54 59 50 | 45 28 5f 5f 74 63 43 6f |F VARTYP|E(__tcCo|
|00004e20| 64 65 29 23 22 43 22 20 | 4f 52 20 45 4d 50 54 59 |de)#"C" |OR EMPTY|
|00004e30| 28 5f 5f 74 63 43 6f 64 | 65 29 0d 0a 09 09 52 45 |(__tcCod|e)....RE|
|00004e40| 54 55 52 4e 0d 0a 09 45 | 4e 44 49 46 0d 0a 09 49 |TURN...E|NDIF...I|
|00004e50| 46 20 5f 5f 74 6c 46 69 | 6c 65 0d 0a 09 09 5f 5f |F __tlFi|le....__|
|00004e60| 6c 63 43 6f 64 65 3d 41 | 4c 4c 54 52 49 4d 28 46 |lcCode=A|LLTRIM(F|
|00004e70| 49 4c 45 54 4f 53 54 52 | 28 5f 5f 74 63 43 6f 64 |ILETOSTR|(__tcCod|
|00004e80| 65 29 29 0d 0a 09 45 4c | 53 45 0d 0a 09 09 5f 5f |e))...EL|SE....__|
|00004e90| 6c 63 43 6f 64 65 3d 41 | 4c 4c 54 52 49 4d 28 5f |lcCode=A|LLTRIM(_|
|00004ea0| 5f 74 63 43 6f 64 65 29 | 0d 0a 09 45 4e 44 49 46 |_tcCode)|...ENDIF|
|00004eb0| 0d 0a 09 49 46 20 4c 45 | 46 54 28 5f 5f 6c 63 43 |...IF LE|FT(__lcC|
|00004ec0| 6f 64 65 2c 31 29 3d 3d | 22 3b 22 0d 0a 09 09 5f |ode,1)==|";"...._|
|00004ed0| 5f 6c 63 43 6f 64 65 3d | 53 54 52 54 52 41 4e 28 |_lcCode=|STRTRAN(|
|00004ee0| 5f 5f 6c 63 43 6f 64 65 | 2c 22 3b 22 2c 43 52 5f |__lcCode|,";",CR_|
|00004ef0| 4c 46 29 0d 0a 09 45 4e | 44 49 46 0d 0a 09 5f 5f |LF)...EN|DIF...__|
|00004f00| 6c 6e 4c 69 6e 65 54 6f | 74 61 6c 3d 41 4c 49 4e |lnLineTo|tal=ALIN|
|00004f10| 45 53 28 5f 5f 6c 61 4c | 69 6e 65 73 2c 5f 5f 6c |ES(__laL|ines,__l|
|00004f20| 63 43 6f 64 65 29 0d 0a | 09 49 46 20 5f 5f 6c 6e |cCode)..|.IF __ln|
|00004f30| 4c 69 6e 65 54 6f 74 61 | 6c 3d 30 0d 0a 09 09 52 |LineTota|l=0....R|
|00004f40| 45 54 55 52 4e 0d 0a 09 | 45 4e 44 49 46 0d 0a 09 |ETURN...|ENDIF...|
|00004f50| 50 52 49 56 41 54 45 20 | 5f 5f 6c 63 4c 61 73 74 |PRIVATE |__lcLast|
|00004f60| 4c 69 6e 65 0d 0a 09 5f | 5f 6c 63 4c 61 73 74 4c |Line..._|_lcLastL|
|00004f70| 69 6e 65 3d 22 22 0d 0a | 09 5f 5f 6c 6e 4c 69 6e |ine=""..|.__lnLin|
|00004f80| 65 3d 30 0d 0a 09 44 4f | 20 57 48 49 4c 45 20 5f |e=0...DO| WHILE _|
|00004f90| 5f 6c 6e 4c 69 6e 65 3c | 5f 5f 6c 6e 4c 69 6e 65 |_lnLine<|__lnLine|
|00004fa0| 54 6f 74 61 6c 0d 0a 09 | 09 5f 5f 6c 6e 4c 69 6e |Total...|.__lnLin|
|00004fb0| 65 3d 5f 5f 6c 6e 4c 69 | 6e 65 2b 31 0d 0a 09 09 |e=__lnLi|ne+1....|
|00004fc0| 5f 5f 6c 63 4c 69 6e 65 | 3d 41 4c 4c 54 52 49 4d |__lcLine|=ALLTRIM|
|00004fd0| 28 5f 5f 6c 61 4c 69 6e | 65 73 5b 5f 5f 6c 6e 4c |(__laLin|es[__lnL|
|00004fe0| 69 6e 65 5d 29 0d 0a 09 | 09 5f 5f 6c 6e 41 74 50 |ine])...|.__lnAtP|
|00004ff0| 6f 73 3d 41 54 28 22 26 | 22 2b 22 26 22 2c 5f 5f |os=AT("&|"+"&",__|
|00005000| 6c 63 4c 69 6e 65 29 0d | 0a 09 09 49 46 20 5f 5f |lcLine).|...IF __|
|00005010| 6c 6e 41 74 50 6f 73 3e | 30 0d 0a 09 09 09 5f 5f |lnAtPos>|0.....__|
|00005020| 6c 63 4c 69 6e 65 3d 41 | 4c 4c 54 52 49 4d 28 4c |lcLine=A|LLTRIM(L|
|00005030| 45 46 54 28 5f 5f 6c 63 | 4c 69 6e 65 2c 5f 5f 6c |EFT(__lc|Line,__l|
|00005040| 6e 41 74 50 6f 73 2d 31 | 29 29 0d 0a 09 09 45 4e |nAtPos-1|))....EN|
|00005050| 44 49 46 0d 0a 09 09 44 | 4f 20 57 48 49 4c 45 20 |DIF....D|O WHILE |
|00005060| 2e 54 2e 0d 0a 09 09 09 | 5f 5f 6c 63 43 68 61 72 |.T......|__lcChar|
|00005070| 3d 4c 45 46 54 28 5f 5f | 6c 63 4c 69 6e 65 2c 31 |=LEFT(__|lcLine,1|
|00005080| 29 0d 0a 09 09 09 49 46 | 20 5f 5f 6c 63 43 68 61 |).....IF| __lcCha|
|00005090| 72 3d 3d 22 20 22 20 4f | 52 20 5f 5f 6c 63 43 68 |r==" " O|R __lcCh|
|000050a0| 61 72 3d 3d 54 41 42 0d | 0a 09 09 09 09 5f 5f 6c |ar==TAB.|.....__l|
|000050b0| 63 4c 69 6e 65 3d 41 4c | 4c 54 52 49 4d 28 53 55 |cLine=AL|LTRIM(SU|
|000050c0| 42 53 54 52 28 5f 5f 6c | 63 4c 69 6e 65 2c 32 29 |BSTR(__l|cLine,2)|
|000050d0| 29 0d 0a 09 09 09 09 4c | 4f 4f 50 0d 0a 09 09 09 |)......L|OOP.....|
|000050e0| 45 4e 44 49 46 0d 0a 09 | 09 09 5f 5f 6c 63 43 68 |ENDIF...|..__lcCh|
|000050f0| 61 72 3d 52 49 47 48 54 | 28 5f 5f 6c 63 4c 69 6e |ar=RIGHT|(__lcLin|
|00005100| 65 2c 31 29 0d 0a 09 09 | 09 49 46 20 5f 5f 6c 63 |e,1)....|.IF __lc|
|00005110| 43 68 61 72 3d 3d 22 20 | 22 20 4f 52 20 5f 5f 6c |Char==" |" OR __l|
|00005120| 63 43 68 61 72 3d 3d 54 | 41 42 0d 0a 09 09 09 09 |cChar==T|AB......|
|00005130| 5f 5f 6c 63 4c 69 6e 65 | 3d 54 52 49 4d 28 4c 45 |__lcLine|=TRIM(LE|
|00005140| 46 54 28 5f 5f 6c 63 4c | 69 6e 65 2c 4c 45 4e 28 |FT(__lcL|ine,LEN(|
|00005150| 5f 5f 6c 63 4c 69 6e 65 | 29 2d 31 29 29 0d 0a 09 |__lcLine|)-1))...|
|00005160| 09 09 09 4c 4f 4f 50 0d | 0a 09 09 09 45 4e 44 49 |...LOOP.|....ENDI|
|00005170| 46 0d 0a 09 09 09 45 58 | 49 54 0d 0a 09 09 45 4e |F.....EX|IT....EN|
|00005180| 44 44 4f 0d 0a 09 09 49 | 46 20 45 4d 50 54 59 28 |DDO....I|F EMPTY(|
|00005190| 5f 5f 6c 63 4c 69 6e 65 | 29 20 4f 52 20 4c 45 46 |__lcLine|) OR LEF|
|000051a0| 54 28 5f 5f 6c 63 4c 69 | 6e 65 2c 31 29 3d 3d 22 |T(__lcLi|ne,1)=="|
|000051b0| 2a 22 20 4f 52 20 4c 45 | 46 54 28 5f 5f 6c 63 4c |*" OR LE|FT(__lcL|
|000051c0| 69 6e 65 2c 31 29 3d 3d | 22 23 22 20 4f 52 20 3b |ine,1)==|"#" OR ;|
|000051d0| 0d 0a 09 09 09 09 4c 45 | 46 54 28 5f 5f 6c 63 4c |......LE|FT(__lcL|
|000051e0| 69 6e 65 2c 32 29 3d 3d | 28 22 26 22 2b 22 26 22 |ine,2)==|("&"+"&"|
|000051f0| 29 20 4f 52 20 55 50 50 | 45 52 28 4c 45 46 54 28 |) OR UPP|ER(LEFT(|
|00005200| 5f 5f 6c 63 4c 69 6e 65 | 2c 34 29 29 3d 3d 22 4e |__lcLine|,4))=="N|
|00005210| 4f 54 45 22 20 4f 52 20 | 3b 0d 0a 09 09 09 09 4c |OTE" OR |;......L|
|00005220| 45 46 54 28 5f 5f 6c 63 | 4c 69 6e 65 2c 34 29 3d |EFT(__lc|Line,4)=|
|00005230| 3d 22 3c 21 2d 2d 22 0d | 0a 09 09 09 41 44 45 4c |="<!--".|....ADEL|
|00005240| 28 5f 5f 6c 61 4c 69 6e | 65 73 2c 5f 5f 6c 6e 4c |(__laLin|es,__lnL|
|00005250| 69 6e 65 29 0d 0a 09 09 | 09 5f 5f 6c 6e 4c 69 6e |ine)....|.__lnLin|
|00005260| 65 54 6f 74 61 6c 3d 5f | 5f 6c 6e 4c 69 6e 65 54 |eTotal=_|_lnLineT|
|00005270| 6f 74 61 6c 2d 31 0d 0a | 09 09 09 44 49 4d 45 4e |otal-1..|...DIMEN|
|00005280| 53 49 4f 4e 20 5f 5f 6c | 61 4c 69 6e 65 73 5b 5f |SION __l|aLines[_|
|00005290| 5f 6c 6e 4c 69 6e 65 54 | 6f 74 61 6c 5d 0d 0a 09 |_lnLineT|otal]...|
|000052a0| 09 09 5f 5f 6c 6e 4c 69 | 6e 65 3d 5f 5f 6c 6e 4c |..__lnLi|ne=__lnL|
|000052b0| 69 6e 65 2d 31 0d 0a 09 | 09 09 4c 4f 4f 50 0d 0a |ine-1...|..LOOP..|
|000052c0| 09 09 45 4e 44 49 46 0d | 0a 09 09 49 46 20 5f 5f |..ENDIF.|...IF __|
|000052d0| 6c 6e 4c 69 6e 65 3e 3d | 32 20 41 4e 44 20 52 49 |lnLine>=|2 AND RI|
|000052e0| 47 48 54 28 5f 5f 6c 61 | 4c 69 6e 65 73 5b 5f 5f |GHT(__la|Lines[__|
|000052f0| 6c 6e 4c 69 6e 65 2d 31 | 5d 2c 31 29 3d 3d 22 3b |lnLine-1|],1)==";|
|00005300| 22 0d 0a 09 09 09 5f 5f | 6c 63 4c 69 6e 65 32 3d |".....__|lcLine2=|
|00005310| 4c 45 46 54 28 5f 5f 6c | 61 4c 69 6e 65 73 5b 5f |LEFT(__l|aLines[_|
|00005320| 5f 6c 6e 4c 69 6e 65 2d | 31 5d 2c 4c 45 4e 28 5f |_lnLine-|1],LEN(_|
|00005330| 5f 6c 61 4c 69 6e 65 73 | 5b 5f 5f 6c 6e 4c 69 6e |_laLines|[__lnLin|
|00005340| 65 2d 31 5d 29 2d 31 29 | 0d 0a 09 09 09 44 4f 20 |e-1])-1)|.....DO |
|00005350| 57 48 49 4c 45 20 2e 54 | 2e 0d 0a 09 09 09 09 5f |WHILE .T|......._|
|00005360| 5f 6c 63 43 68 61 72 3d | 52 49 47 48 54 28 5f 5f |_lcChar=|RIGHT(__|
|00005370| 6c 63 4c 69 6e 65 32 2c | 31 29 0d 0a 09 09 09 09 |lcLine2,|1)......|
|00005380| 49 46 20 5f 5f 6c 63 43 | 68 61 72 3d 3d 22 20 22 |IF __lcC|har==" "|
|00005390| 20 4f 52 20 5f 5f 6c 63 | 43 68 61 72 3d 3d 54 41 | OR __lc|Char==TA|
|000053a0| 42 0d 0a 09 09 09 09 09 | 5f 5f 6c 63 4c 69 6e 65 |B.......|__lcLine|
|000053b0| 32 3d 54 52 49 4d 28 4c | 45 46 54 28 5f 5f 6c 63 |2=TRIM(L|EFT(__lc|
|000053c0| 4c 69 6e 65 32 2c 4c 45 | 4e 28 5f 5f 6c 63 4c 69 |Line2,LE|N(__lcLi|
|000053d0| 6e 65 32 29 2d 31 29 29 | 0d 0a 09 09 09 09 09 4c |ne2)-1))|.......L|
|000053e0| 4f 4f 50 0d 0a 09 09 09 | 09 45 4e 44 49 46 0d 0a |OOP.....|.ENDIF..|
|000053f0| 09 09 09 09 45 58 49 54 | 0d 0a 09 09 09 45 4e 44 |....EXIT|.....END|
|00005400| 44 4f 0d 0a 09 09 09 5f | 5f 6c 6e 4c 69 6e 65 3d |DO....._|_lnLine=|
|00005410| 5f 5f 6c 6e 4c 69 6e 65 | 2d 31 0d 0a 09 09 09 5f |__lnLine|-1....._|
|00005420| 5f 6c 63 4c 69 6e 65 3d | 5f 5f 6c 63 4c 69 6e 65 |_lcLine=|__lcLine|
|00005430| 32 2b 22 20 22 2b 5f 5f | 6c 63 4c 69 6e 65 0d 0a |2+" "+__|lcLine..|
|00005440| 09 09 09 41 44 45 4c 28 | 5f 5f 6c 61 4c 69 6e 65 |...ADEL(|__laLine|
|00005450| 73 2c 5f 5f 6c 6e 4c 69 | 6e 65 29 0d 0a 09 09 09 |s,__lnLi|ne).....|
|00005460| 5f 5f 6c 6e 4c 69 6e 65 | 54 6f 74 61 6c 3d 5f 5f |__lnLine|Total=__|
|00005470| 6c 6e 4c 69 6e 65 54 6f | 74 61 6c 2d 31 0d 0a 09 |lnLineTo|tal-1...|
|00005480| 09 09 44 49 4d 45 4e 53 | 49 4f 4e 20 5f 5f 6c 61 |..DIMENS|ION __la|
|00005490| 4c 69 6e 65 73 5b 5f 5f | 6c 6e 4c 69 6e 65 54 6f |Lines[__|lnLineTo|
|000054a0| 74 61 6c 5d 0d 0a 09 09 | 09 5f 5f 6c 61 4c 69 6e |tal]....|.__laLin|
|000054b0| 65 73 5b 5f 5f 6c 6e 4c | 69 6e 65 5d 3d 5f 5f 6c |es[__lnL|ine]=__l|
|000054c0| 63 4c 69 6e 65 0d 0a 09 | 09 45 4c 53 45 0d 0a 09 |cLine...|.ELSE...|
|000054d0| 09 09 5f 5f 6c 61 4c 69 | 6e 65 73 5b 5f 5f 6c 6e |..__laLi|nes[__ln|
|000054e0| 4c 69 6e 65 5d 3d 5f 5f | 6c 63 4c 69 6e 65 0d 0a |Line]=__|lcLine..|
|000054f0| 09 09 45 4e 44 49 46 0d | 0a 09 45 4e 44 44 4f 0d |..ENDIF.|..ENDDO.|
|00005500| 0a 45 4e 44 49 46 0d 0a | 49 46 20 5f 5f 6c 6e 4c |.ENDIF..|IF __lnL|
|00005510| 69 6e 65 54 6f 74 61 6c | 3d 30 0d 0a 09 52 45 54 |ineTotal|=0...RET|
|00005520| 55 52 4e 0d 0a 45 4e 44 | 49 46 0d 0a 5f 5f 6c 63 |URN..END|IF..__lc|
|00005530| 4c 61 73 74 4f 6e 45 72 | 72 6f 72 3d 4f 4e 28 22 |LastOnEr|ror=ON("|
|00005540| 45 52 52 4f 52 22 29 0d | 0a 44 4f 20 43 41 53 45 |ERROR").|.DO CASE|
|00005550| 0d 0a 09 43 41 53 45 20 | 5f 5f 6c 63 4f 6e 45 72 |...CASE |__lcOnEr|
|00005560| 72 6f 72 3d 3d 22 5f 5f | 22 0d 0a 09 09 4f 4e 20 |ror=="__|"....ON |
|00005570| 45 52 52 4f 52 0d 0a 09 | 43 41 53 45 20 5f 5f 6c |ERROR...|CASE __l|
|00005580| 63 4f 6e 45 72 72 6f 72 | 3d 3d 22 3d 2e 46 2e 22 |cOnError|=="=.F."|
|00005590| 0d 0a 09 09 4f 4e 20 45 | 52 52 4f 52 20 3d 2e 46 |....ON E|RROR =.F|
|000055a0| 2e 0d 0a 09 43 41 53 45 | 20 45 4d 50 54 59 28 5f |....CASE| EMPTY(_|
|000055b0| 5f 6c 63 4f 6e 45 72 72 | 6f 72 29 0d 0a 09 09 4f |_lcOnErr|or)....O|
|000055c0| 4e 20 45 52 52 4f 52 0d | 0a 09 4f 54 48 45 52 57 |N ERROR.|..OTHERW|
|000055d0| 49 53 45 0d 0a 09 09 4f | 4e 20 45 52 52 4f 52 20 |ISE....O|N ERROR |
|000055e0| 26 5f 5f 6c 63 4f 6e 45 | 72 72 6f 72 0d 0a 45 4e |&__lcOnE|rror..EN|
|000055f0| 44 43 41 53 45 0d 0a 5f | 5f 6c 76 52 65 73 75 6c |DCASE.._|_lvResul|
|00005600| 74 3d 2e 54 2e 0d 0a 5f | 5f 6c 63 4c 69 6e 65 3d |t=.T..._|_lcLine=|
|00005610| 22 22 0d 0a 53 54 4f 52 | 45 20 2e 46 2e 20 54 4f |""..STOR|E .F. TO|
|00005620| 20 5f 5f 6c 6c 49 66 45 | 78 70 72 2c 5f 5f 6c 6c | __llIfE|xpr,__ll|
|00005630| 54 65 78 74 4d 6f 64 65 | 0d 0a 53 54 4f 52 45 20 |TextMode|..STORE |
|00005640| 22 22 20 54 4f 20 5f 5f | 6c 63 44 6f 45 78 70 72 |"" TO __|lcDoExpr|
|00005650| 2c 5f 5f 6c 63 46 6f 72 | 45 78 70 72 2c 5f 5f 6c |,__lcFor|Expr,__l|
|00005660| 63 49 66 45 78 70 72 0d | 0a 53 54 4f 52 45 20 30 |cIfExpr.|.STORE 0|
|00005670| 20 54 4f 20 5f 5f 6c 6e | 4c 69 6e 65 2c 5f 5f 6c | TO __ln|Line,__l|
|00005680| 6e 44 6f 4c 69 6e 65 2c | 5f 5f 6c 6e 44 6f 4c 69 |nDoLine,|__lnDoLi|
|00005690| 6e 65 54 6f 74 61 6c 2c | 5f 5f 6c 6e 44 6f 53 74 |neTotal,|__lnDoSt|
|000056a0| 61 63 6b 43 6f 75 6e 74 | 2c 20 3b 0d 0a 09 09 5f |ackCount|, ;...._|
|000056b0| 5f 6c 6e 46 6f 72 4c 69 | 6e 65 2c 5f 5f 6c 6e 46 |_lnForLi|ne,__lnF|
|000056c0| 6f 72 4c 69 6e 65 54 6f | 74 61 6c 2c 5f 5f 6c 6e |orLineTo|tal,__ln|
|000056d0| 46 6f 72 53 74 61 63 6b | 43 6f 75 6e 74 2c 5f 5f |ForStack|Count,__|
|000056e0| 6c 6e 46 6f 72 4d 61 78 | 2c 20 3b 0d 0a 09 09 5f |lnForMax|, ;...._|
|000056f0| 5f 6c 6e 46 6f 72 53 74 | 65 70 2c 5f 5f 6c 6e 49 |_lnForSt|ep,__lnI|
|00005700| 66 4c 69 6e 65 2c 5f 5f | 6c 6e 49 66 4c 69 6e 65 |fLine,__|lnIfLine|
|00005710| 54 6f 74 61 6c 2c 5f 5f | 6c 6e 49 66 53 74 61 63 |Total,__|lnIfStac|
|00005720| 6b 43 6f 75 6e 74 0d 0a | 44 4f 20 57 48 49 4c 45 |kCount..|DO WHILE|
|00005730| 20 5f 5f 6c 6e 4c 69 6e | 65 3c 5f 5f 6c 6e 4c 69 | __lnLin|e<__lnLi|
|00005740| 6e 65 54 6f 74 61 6c 0d | 0a 09 5f 5f 6c 6e 4c 69 |neTotal.|..__lnLi|
|00005750| 6e 65 3d 5f 5f 6c 6e 4c | 69 6e 65 2b 31 0d 0a 09 |ne=__lnL|ine+1...|
|00005760| 5f 5f 6c 63 4c 69 6e 65 | 3d 5f 5f 6c 61 4c 69 6e |__lcLine|=__laLin|
|00005770| 65 73 5b 5f 5f 6c 6e 4c | 69 6e 65 5d 0d 0a 09 49 |es[__lnL|ine]...I|
|00005780| 46 20 45 4d 50 54 59 28 | 5f 5f 6c 63 4c 69 6e 65 |F EMPTY(|__lcLine|
|00005790| 29 0d 0a 09 09 4c 4f 4f | 50 0d 0a 09 45 4e 44 49 |)....LOO|P...ENDI|
|000057a0| 46 0d 0a 09 49 46 20 4c | 45 46 54 28 5f 5f 6c 63 |F...IF L|EFT(__lc|
|000057b0| 4c 69 6e 65 2c 31 29 3d | 3d 22 3d 22 0d 0a 09 09 |Line,1)=|="="....|
|000057c0| 45 56 41 4c 55 41 54 45 | 28 53 55 42 53 54 52 28 |EVALUATE|(SUBSTR(|
|000057d0| 5f 5f 6c 63 4c 69 6e 65 | 2c 32 29 29 0d 0a 09 09 |__lcLine|,2))....|
|000057e0| 4c 4f 4f 50 0d 0a 09 45 | 4e 44 49 46 0d 0a 09 5f |LOOP...E|NDIF..._|
|000057f0| 5f 6c 63 43 6f 6d 6d 61 | 6e 64 3d 55 50 50 45 52 |_lcComma|nd=UPPER|
|00005800| 28 4c 45 46 54 28 5f 5f | 6c 63 4c 69 6e 65 2c 34 |(LEFT(__|lcLine,4|
|00005810| 29 29 0d 0a 09 49 46 20 | 5f 5f 6c 63 43 6f 6d 6d |))...IF |__lcComm|
|00005820| 61 6e 64 3d 3d 22 44 4f | 20 57 22 20 41 4e 44 20 |and=="DO| W" AND |
|00005830| 28 55 50 50 45 52 28 4c | 45 46 54 28 5f 5f 6c 63 |(UPPER(L|EFT(__lc|
|00005840| 4c 69 6e 65 2c 38 29 29 | 3d 3d 22 44 4f 20 57 48 |Line,8))|=="DO WH|
|00005850| 49 4c 20 22 20 4f 52 20 | 3b 0d 0a 09 09 09 55 50 |IL " OR |;.....UP|
|00005860| 50 45 52 28 4c 45 46 54 | 28 5f 5f 6c 63 4c 69 6e |PER(LEFT|(__lcLin|
|00005870| 65 2c 38 29 29 3d 3d 22 | 44 4f 20 57 48 49 4c 45 |e,8))=="|DO WHILE|
|00005880| 22 29 0d 0a 09 09 5f 5f | 6c 63 43 6f 6d 6d 61 6e |")....__|lcComman|
|00005890| 64 3d 22 44 4f 5f 57 22 | 0d 0a 09 09 5f 5f 6c 6e |d="DO_W"|....__ln|
|000058a0| 4f 63 63 75 72 72 65 6e | 63 65 3d 32 0d 0a 09 45 |Occurren|ce=2...E|
|000058b0| 4c 53 45 0d 0a 09 09 5f | 5f 6c 6e 4f 63 63 75 72 |LSE...._|_lnOccur|
|000058c0| 72 65 6e 63 65 3d 31 0d | 0a 09 45 4e 44 49 46 0d |rence=1.|..ENDIF.|
|000058d0| 0a 09 5f 5f 6c 6e 41 74 | 50 6f 73 3d 41 54 28 22 |..__lnAt|Pos=AT("|
|000058e0| 20 22 2c 5f 5f 6c 63 43 | 6f 6d 6d 61 6e 64 2c 5f | ",__lcC|ommand,_|
|000058f0| 5f 6c 6e 4f 63 63 75 72 | 72 65 6e 63 65 29 0d 0a |_lnOccur|rence)..|
|00005900| 09 5f 5f 6c 6e 41 74 50 | 6f 73 32 3d 41 54 28 54 |.__lnAtP|os2=AT(T|
|00005910| 41 42 2c 5f 5f 6c 63 43 | 6f 6d 6d 61 6e 64 2c 5f |AB,__lcC|ommand,_|
|00005920| 5f 6c 6e 4f 63 63 75 72 | 72 65 6e 63 65 29 0d 0a |_lnOccur|rence)..|
|00005930| 09 49 46 20 42 45 54 57 | 45 45 4e 28 5f 5f 6c 6e |.IF BETW|EEN(__ln|
|00005940| 41 74 50 6f 73 32 2c 31 | 2c 5f 5f 6c 6e 41 74 50 |AtPos2,1|,__lnAtP|
|00005950| 6f 73 29 0d 0a 09 09 5f | 5f 6c 6e 41 74 50 6f 73 |os)...._|_lnAtPos|
|00005960| 3d 5f 5f 6c 6e 41 74 50 | 6f 73 32 0d 0a 09 45 4e |=__lnAtP|os2...EN|
|00005970| 44 49 46 0d 0a 09 49 46 | 20 5f 5f 6c 6e 41 74 50 |DIF...IF| __lnAtP|
|00005980| 6f 73 3e 30 0d 0a 09 09 | 5f 5f 6c 63 43 6f 6d 6d |os>0....|__lcComm|
|00005990| 61 6e 64 3d 4c 45 46 54 | 28 5f 5f 6c 63 43 6f 6d |and=LEFT|(__lcCom|
|000059a0| 6d 61 6e 64 2c 5f 5f 6c | 6e 41 74 50 6f 73 2d 31 |mand,__l|nAtPos-1|
|000059b0| 29 0d 0a 09 45 4e 44 49 | 46 0d 0a 09 5f 5f 6c 6e |)...ENDI|F...__ln|
|000059c0| 41 74 50 6f 73 3d 41 54 | 28 22 20 22 2c 5f 5f 6c |AtPos=AT|(" ",__l|
|000059d0| 63 4c 69 6e 65 2c 5f 5f | 6c 6e 4f 63 63 75 72 72 |cLine,__|lnOccurr|
|000059e0| 65 6e 63 65 29 0d 0a 09 | 5f 5f 6c 6e 41 74 50 6f |ence)...|__lnAtPo|
|000059f0| 73 32 3d 41 54 28 54 41 | 42 2c 5f 5f 6c 63 4c 69 |s2=AT(TA|B,__lcLi|
|00005a00| 6e 65 2c 5f 5f 6c 6e 4f | 63 63 75 72 72 65 6e 63 |ne,__lnO|ccurrenc|
|00005a10| 65 29 0d 0a 09 49 46 20 | 42 45 54 57 45 45 4e 28 |e)...IF |BETWEEN(|
|00005a20| 5f 5f 6c 6e 41 74 50 6f | 73 32 2c 31 2c 5f 5f 6c |__lnAtPo|s2,1,__l|
|00005a30| 6e 41 74 50 6f 73 29 0d | 0a 09 09 5f 5f 6c 6e 41 |nAtPos).|...__lnA|
|00005a40| 74 50 6f 73 3d 5f 5f 6c | 6e 41 74 50 6f 73 32 0d |tPos=__l|nAtPos2.|
|00005a50| 0a 09 45 4e 44 49 46 0d | 0a 09 49 46 20 5f 5f 6c |..ENDIF.|..IF __l|
|00005a60| 6e 41 74 50 6f 73 3d 30 | 0d 0a 09 09 5f 5f 6c 63 |nAtPos=0|....__lc|
|00005a70| 45 78 70 72 3d 22 22 0d | 0a 09 45 4c 53 45 0d 0a |Expr="".|..ELSE..|
|00005a80| 09 09 5f 5f 6c 63 45 78 | 70 72 3d 41 4c 4c 54 52 |..__lcEx|pr=ALLTR|
|00005a90| 49 4d 28 53 55 42 53 54 | 52 28 5f 5f 6c 63 4c 69 |IM(SUBST|R(__lcLi|
|00005aa0| 6e 65 2c 5f 5f 6c 6e 41 | 74 50 6f 73 2b 31 29 29 |ne,__lnA|tPos+1))|
|00005ab0| 0d 0a 09 45 4e 44 49 46 | 0d 0a 09 5f 5f 6c 63 4c |...ENDIF|...__lcL|
|00005ac0| 61 73 74 4c 69 6e 65 3d | 5f 5f 6c 63 4c 69 6e 65 |astLine=|__lcLine|
|00005ad0| 0d 0a 09 44 4f 20 43 41 | 53 45 0d 0a 09 09 43 41 |...DO CA|SE....CA|
|00005ae0| 53 45 20 5f 5f 6c 63 43 | 6f 6d 6d 61 6e 64 3d 3d |SE __lcC|ommand==|
|00005af0| 22 45 58 49 54 22 0d 0a | 09 09 09 49 46 20 5f 5f |"EXIT"..|...IF __|
|00005b00| 6c 6c 41 72 72 61 79 43 | 6f 64 65 0d 0a 09 09 09 |llArrayC|ode.....|
|00005b10| 09 52 45 54 55 52 4e 20 | 2e 46 2e 0d 0a 09 09 09 |.RETURN |.F......|
|00005b20| 45 4e 44 49 46 0d 0a 09 | 09 09 4c 4f 4f 50 0d 0a |ENDIF...|..LOOP..|
|00005b30| 09 09 43 41 53 45 20 5f | 5f 6c 63 43 6f 6d 6d 61 |..CASE _|_lcComma|
|00005b40| 6e 64 3d 3d 22 45 4e 44 | 54 22 0d 0a 09 09 09 5f |nd=="END|T"....._|
|00005b50| 5f 6c 6c 54 65 78 74 4d | 6f 64 65 3d 2e 46 2e 0d |_llTextM|ode=.F..|
|00005b60| 0a 09 09 09 4c 4f 4f 50 | 0d 0a 09 09 43 41 53 45 |....LOOP|....CASE|
|00005b70| 20 5f 5f 6c 6c 54 65 78 | 74 4d 6f 64 65 0d 0a 09 | __llTex|tMode...|
|00005b80| 09 09 5f 5f 6c 63 4c 69 | 6e 65 3d 22 5c 22 2b 5f |..__lcLi|ne="\"+_|
|00005b90| 5f 6c 63 4c 69 6e 65 0d | 0a 09 09 09 5f 5f 6c 63 |_lcLine.|....__lc|
|00005ba0| 4c 61 73 74 4c 69 6e 65 | 3d 5f 5f 6c 63 4c 69 6e |LastLine|=__lcLin|
|00005bb0| 65 0d 0a 09 09 09 26 5f | 5f 6c 63 4c 69 6e 65 0d |e.....&_|_lcLine.|
|00005bc0| 0a 09 09 09 4c 4f 4f 50 | 0d 0a 09 09 43 41 53 45 |....LOOP|....CASE|
|00005bd0| 20 5f 5f 6c 63 43 6f 6d | 6d 61 6e 64 3d 3d 22 44 | __lcCom|mand=="D|
|00005be0| 4f 5f 57 22 0d 0a 09 09 | 09 5f 5f 6c 6e 44 6f 53 |O_W"....|.__lnDoS|
|00005bf0| 74 61 63 6b 43 6f 75 6e | 74 3d 5f 5f 6c 6e 44 6f |tackCoun|t=__lnDo|
|00005c00| 53 74 61 63 6b 43 6f 75 | 6e 74 2b 31 0d 0a 09 09 |StackCou|nt+1....|
|00005c10| 09 49 46 20 5f 5f 6c 6e | 44 6f 53 74 61 63 6b 43 |.IF __ln|DoStackC|
|00005c20| 6f 75 6e 74 3d 31 20 41 | 4e 44 20 5f 5f 6c 6e 46 |ount=1 A|ND __lnF|
|00005c30| 6f 72 53 74 61 63 6b 43 | 6f 75 6e 74 3d 30 20 41 |orStackC|ount=0 A|
|00005c40| 4e 44 20 5f 5f 6c 6e 49 | 66 53 74 61 63 6b 43 6f |ND __lnI|fStackCo|
|00005c50| 75 6e 74 3d 30 0d 0a 09 | 09 09 09 5f 5f 6c 63 44 |unt=0...|...__lcD|
|00005c60| 6f 45 78 70 72 3d 5f 5f | 6c 63 45 78 70 72 0d 0a |oExpr=__|lcExpr..|
|00005c70| 09 09 09 09 5f 5f 6c 6e | 44 6f 4c 69 6e 65 3d 5f |....__ln|DoLine=_|
|00005c80| 5f 6c 6e 4c 69 6e 65 0d | 0a 09 09 09 09 4c 4f 4f |_lnLine.|.....LOO|
|00005c90| 50 0d 0a 09 09 09 45 4e | 44 49 46 0d 0a 09 09 43 |P.....EN|DIF....C|
|00005ca0| 41 53 45 20 5f 5f 6c 63 | 43 6f 6d 6d 61 6e 64 3d |ASE __lc|Command=|
|00005cb0| 3d 22 46 4f 52 22 0d 0a | 09 09 09 5f 5f 6c 6e 46 |="FOR"..|...__lnF|
|00005cc0| 6f 72 53 74 61 63 6b 43 | 6f 75 6e 74 3d 5f 5f 6c |orStackC|ount=__l|
|00005cd0| 6e 46 6f 72 53 74 61 63 | 6b 43 6f 75 6e 74 2b 31 |nForStac|kCount+1|
|00005ce0| 0d 0a 09 09 09 49 46 20 | 5f 5f 6c 6e 44 6f 53 74 |.....IF |__lnDoSt|
|00005cf0| 61 63 6b 43 6f 75 6e 74 | 3d 30 20 41 4e 44 20 5f |ackCount|=0 AND _|
|00005d00| 5f 6c 6e 44 6f 53 74 61 | 63 6b 43 6f 75 6e 74 3d |_lnDoSta|ckCount=|
|00005d10| 30 20 41 4e 44 20 5f 5f | 6c 6e 49 66 53 74 61 63 |0 AND __|lnIfStac|
|00005d20| 6b 43 6f 75 6e 74 3d 30 | 0d 0a 09 09 09 09 5f 5f |kCount=0|......__|
|00005d30| 6c 6e 41 74 50 6f 73 3d | 41 54 43 28 22 20 54 4f |lnAtPos=|ATC(" TO|
|00005d40| 20 22 2c 5f 5f 6c 63 45 | 78 70 72 29 0d 0a 09 09 | ",__lcE|xpr)....|
|00005d50| 09 09 49 46 20 5f 5f 6c | 6e 41 74 50 6f 73 3d 30 |..IF __l|nAtPos=0|
|00005d60| 0d 0a 09 09 09 09 09 5f | 5f 6c 63 46 6f 72 45 78 |......._|_lcForEx|
|00005d70| 70 72 3d 22 22 0d 0a 09 | 09 09 09 09 5f 5f 6c 6e |pr=""...|....__ln|
|00005d80| 46 6f 72 4d 61 78 3d 30 | 0d 0a 09 09 09 09 09 5f |ForMax=0|......._|
|00005d90| 5f 6c 6e 46 6f 72 53 74 | 65 70 3d 30 0d 0a 09 09 |_lnForSt|ep=0....|
|00005da0| 09 09 09 4c 4f 4f 50 0d | 0a 09 09 09 09 45 4e 44 |...LOOP.|.....END|
|00005db0| 49 46 0d 0a 09 09 09 09 | 5f 5f 6c 63 46 6f 72 45 |IF......|__lcForE|
|00005dc0| 78 70 72 3d 5f 5f 6c 63 | 45 78 70 72 0d 0a 09 09 |xpr=__lc|Expr....|
|00005dd0| 09 09 5f 5f 6c 63 46 6f | 72 45 78 70 72 3d 41 4c |..__lcFo|rExpr=AL|
|00005de0| 4c 54 52 49 4d 28 4c 45 | 46 54 28 5f 5f 6c 63 45 |LTRIM(LE|FT(__lcE|
|00005df0| 78 70 72 2c 5f 5f 6c 6e | 41 74 50 6f 73 2d 31 29 |xpr,__ln|AtPos-1)|
|00005e00| 29 0d 0a 09 09 09 09 5f | 5f 6c 63 45 78 70 72 3d |)......_|_lcExpr=|
|00005e10| 41 4c 4c 54 52 49 4d 28 | 53 55 42 53 54 52 28 5f |ALLTRIM(|SUBSTR(_|
|00005e20| 5f 6c 63 45 78 70 72 2c | 5f 5f 6c 6e 41 74 50 6f |_lcExpr,|__lnAtPo|
|00005e30| 73 2b 34 29 29 0d 0a 09 | 09 09 09 5f 5f 6c 6e 41 |s+4))...|...__lnA|
|00005e40| 74 50 6f 73 3d 41 54 43 | 28 22 3d 22 2c 5f 5f 6c |tPos=ATC|("=",__l|
|00005e50| 63 46 6f 72 45 78 70 72 | 29 0d 0a 09 09 09 09 49 |cForExpr|)......I|
|00005e60| 46 20 5f 5f 6c 6e 41 74 | 50 6f 73 3d 30 0d 0a 09 |F __lnAt|Pos=0...|
|00005e70| 09 09 09 09 4c 4f 4f 50 | 0d 0a 09 09 09 09 45 4e |....LOOP|......EN|
|00005e80| 44 49 46 0d 0a 09 09 09 | 09 26 5f 5f 6c 63 46 6f |DIF.....|.&__lcFo|
|00005e90| 72 45 78 70 72 0d 0a 09 | 09 09 09 5f 5f 6c 63 46 |rExpr...|...__lcF|
|00005ea0| 6f 72 45 78 70 72 3d 41 | 4c 4c 54 52 49 4d 28 4c |orExpr=A|LLTRIM(L|
|00005eb0| 45 46 54 28 5f 5f 6c 63 | 46 6f 72 45 78 70 72 2c |EFT(__lc|ForExpr,|
|00005ec0| 5f 5f 6c 6e 41 74 50 6f | 73 2d 31 29 29 0d 0a 09 |__lnAtPo|s-1))...|
|00005ed0| 09 09 09 5f 5f 6c 6e 41 | 74 50 6f 73 3d 41 54 43 |...__lnA|tPos=ATC|
|00005ee0| 28 22 20 53 54 45 50 20 | 22 2c 5f 5f 6c 63 45 78 |(" STEP |",__lcEx|
|00005ef0| 70 72 29 0d 0a 09 09 09 | 09 49 46 20 5f 5f 6c 6e |pr).....|.IF __ln|
|00005f00| 41 74 50 6f 73 3d 30 0d | 0a 09 09 09 09 09 5f 5f |AtPos=0.|......__|
|00005f10| 6c 6e 46 6f 72 4d 61 78 | 3d 45 56 41 4c 55 41 54 |lnForMax|=EVALUAT|
|00005f20| 45 28 5f 5f 6c 63 45 78 | 70 72 29 0d 0a 09 09 09 |E(__lcEx|pr).....|
|00005f30| 09 09 5f 5f 6c 6e 46 6f | 72 53 74 65 70 3d 31 0d |..__lnFo|rStep=1.|
|00005f40| 0a 09 09 09 09 45 4c 53 | 45 0d 0a 09 09 09 09 09 |.....ELS|E.......|
|00005f50| 5f 5f 6c 6e 46 6f 72 4d | 61 78 3d 45 56 41 4c 55 |__lnForM|ax=EVALU|
|00005f60| 41 54 45 28 4c 45 46 54 | 28 5f 5f 6c 63 45 78 70 |ATE(LEFT|(__lcExp|
|00005f70| 72 2c 5f 5f 6c 6e 41 74 | 50 6f 73 2d 31 29 29 0d |r,__lnAt|Pos-1)).|
|00005f80| 0a 09 09 09 09 09 5f 5f | 6c 6e 46 6f 72 53 74 65 |......__|lnForSte|
|00005f90| 70 3d 45 56 41 4c 55 41 | 54 45 28 53 55 42 53 54 |p=EVALUA|TE(SUBST|
|00005fa0| 52 28 5f 5f 6c 63 45 78 | 70 72 2c 5f 5f 6c 6e 41 |R(__lcEx|pr,__lnA|
|00005fb0| 74 50 6f 73 2b 36 29 29 | 0d 0a 09 09 09 09 45 4e |tPos+6))|......EN|
|00005fc0| 44 49 46 0d 0a 09 09 09 | 09 5f 5f 6c 6e 46 6f 72 |DIF.....|.__lnFor|
|00005fd0| 4c 69 6e 65 3d 5f 5f 6c | 6e 4c 69 6e 65 0d 0a 09 |Line=__l|nLine...|
|00005fe0| 09 09 09 4c 4f 4f 50 0d | 0a 09 09 09 45 4e 44 49 |...LOOP.|....ENDI|
|00005ff0| 46 0d 0a 09 09 43 41 53 | 45 20 5f 5f 6c 63 43 6f |F....CAS|E __lcCo|
|00006000| 6d 6d 61 6e 64 3d 3d 22 | 49 46 22 0d 0a 09 09 09 |mmand=="|IF".....|
|00006010| 5f 5f 6c 6e 49 66 53 74 | 61 63 6b 43 6f 75 6e 74 |__lnIfSt|ackCount|
|00006020| 3d 5f 5f 6c 6e 49 66 53 | 74 61 63 6b 43 6f 75 6e |=__lnIfS|tackCoun|
|00006030| 74 2b 31 0d 0a 09 09 09 | 49 46 20 5f 5f 6c 6e 49 |t+1.....|IF __lnI|
|00006040| 66 53 74 61 63 6b 43 6f | 75 6e 74 3d 31 20 41 4e |fStackCo|unt=1 AN|
|00006050| 44 20 5f 5f 6c 6e 44 6f | 53 74 61 63 6b 43 6f 75 |D __lnDo|StackCou|
|00006060| 6e 74 3d 30 20 41 4e 44 | 20 5f 5f 6c 6e 46 6f 72 |nt=0 AND| __lnFor|
|00006070| 53 74 61 63 6b 43 6f 75 | 6e 74 3d 30 0d 0a 09 09 |StackCou|nt=0....|
|00006080| 09 09 5f 5f 6c 63 49 66 | 45 78 70 72 3d 5f 5f 6c |..__lcIf|Expr=__l|
|00006090| 63 45 78 70 72 0d 0a 09 | 09 09 09 5f 5f 6c 6c 49 |cExpr...|...__llI|
|000060a0| 66 45 78 70 72 3d 45 56 | 41 4c 55 41 54 45 28 5f |fExpr=EV|ALUATE(_|
|000060b0| 5f 6c 63 49 66 45 78 70 | 72 29 0d 0a 09 09 09 09 |_lcIfExp|r)......|
|000060c0| 5f 5f 6c 6e 49 66 4c 69 | 6e 65 3d 5f 5f 6c 6e 4c |__lnIfLi|ne=__lnL|
|000060d0| 69 6e 65 0d 0a 09 09 09 | 09 4c 4f 4f 50 0d 0a 09 |ine.....|.LOOP...|
|000060e0| 09 09 45 4e 44 49 46 0d | 0a 09 09 43 41 53 45 20 |..ENDIF.|...CASE |
|000060f0| 5f 5f 6c 63 43 6f 6d 6d | 61 6e 64 3d 3d 22 45 4c |__lcComm|and=="EL|
|00006100| 53 45 22 0d 0a 09 09 09 | 49 46 20 5f 5f 6c 6e 49 |SE".....|IF __lnI|
|00006110| 66 53 74 61 63 6b 43 6f | 75 6e 74 3d 31 20 41 4e |fStackCo|unt=1 AN|
|00006120| 44 20 5f 5f 6c 6e 44 6f | 53 74 61 63 6b 43 6f 75 |D __lnDo|StackCou|
|00006130| 6e 74 3d 30 20 41 4e 44 | 20 5f 5f 6c 6e 46 6f 72 |nt=0 AND| __lnFor|
|00006140| 53 74 61 63 6b 43 6f 75 | 6e 74 3d 30 0d 0a 09 09 |StackCou|nt=0....|
|00006150| 09 09 5f 5f 6c 6c 49 66 | 45 78 70 72 3d 28 4e 4f |..__llIf|Expr=(NO|
|00006160| 54 20 5f 5f 6c 6c 49 66 | 45 78 70 72 29 0d 0a 09 |T __llIf|Expr)...|
|00006170| 09 09 09 4c 4f 4f 50 0d | 0a 09 09 09 45 4e 44 49 |...LOOP.|....ENDI|
|00006180| 46 0d 0a 09 09 43 41 53 | 45 20 5f 5f 6c 63 43 6f |F....CAS|E __lcCo|
|00006190| 6d 6d 61 6e 64 3d 3d 22 | 45 4e 44 44 22 0d 0a 09 |mmand=="|ENDD"...|
|000061a0| 09 09 5f 5f 6c 6e 44 6f | 53 74 61 63 6b 43 6f 75 |..__lnDo|StackCou|
|000061b0| 6e 74 3d 5f 5f 6c 6e 44 | 6f 53 74 61 63 6b 43 6f |nt=__lnD|oStackCo|
|000061c0| 75 6e 74 2d 31 0d 0a 09 | 09 09 49 46 20 5f 5f 6c |unt-1...|..IF __l|
|000061d0| 6e 44 6f 53 74 61 63 6b | 43 6f 75 6e 74 3d 30 20 |nDoStack|Count=0 |
|000061e0| 41 4e 44 20 5f 5f 6c 6e | 46 6f 72 53 74 61 63 6b |AND __ln|ForStack|
|000061f0| 43 6f 75 6e 74 3d 30 20 | 41 4e 44 20 5f 5f 6c 6e |Count=0 |AND __ln|
|00006200| 49 66 53 74 61 63 6b 43 | 6f 75 6e 74 3d 30 0d 0a |IfStackC|ount=0..|
|00006210| 09 09 09 09 44 4f 20 57 | 48 49 4c 45 20 4e 4f 54 |....DO W|HILE NOT|
|00006220| 20 45 4d 50 54 59 28 5f | 5f 6c 63 44 6f 45 78 70 | EMPTY(_|_lcDoExp|
|00006230| 72 29 20 41 4e 44 20 45 | 56 41 4c 55 41 54 45 28 |r) AND E|VALUATE(|
|00006240| 5f 5f 6c 63 44 6f 45 78 | 70 72 29 0d 0a 09 09 09 |__lcDoEx|pr).....|
|00006250| 09 09 5f 5f 6c 76 52 65 | 73 75 6c 74 3d 52 75 6e |..__lvRe|sult=Run|
|00006260| 43 6f 64 65 28 40 5f 5f | 6c 61 44 6f 4c 69 6e 65 |Code(@__|laDoLine|
|00006270| 73 2c 2e 46 2e 2c 5f 5f | 74 76 49 67 6e 6f 72 65 |s,.F.,__|tvIgnore|
|00006280| 45 72 72 6f 72 73 29 0d | 0a 09 09 09 09 09 49 46 |Errors).|......IF|
|00006290| 20 49 53 4e 55 4c 4c 28 | 5f 5f 6c 61 44 6f 4c 69 | ISNULL(|__laDoLi|
|000062a0| 6e 65 73 5b 31 5d 29 0d | 0a 09 09 09 09 09 09 49 |nes[1]).|.......I|
|000062b0| 46 20 5f 5f 6c 6c 41 72 | 72 61 79 43 6f 64 65 0d |F __llAr|rayCode.|
|000062c0| 0a 09 09 09 09 09 09 09 | 5f 5f 74 63 43 6f 64 65 |........|__tcCode|
|000062d0| 5b 31 5d 3d 2e 4e 55 4c | 4c 2e 0d 0a 09 09 09 09 |[1]=.NUL|L.......|
|000062e0| 09 09 45 4e 44 49 46 0d | 0a 09 09 09 09 09 09 52 |..ENDIF.|.......R|
|000062f0| 45 54 55 52 4e 20 5f 5f | 6c 76 52 65 73 75 6c 74 |ETURN __|lvResult|
|00006300| 0d 0a 09 09 09 09 09 45 | 4e 44 49 46 0d 0a 09 09 |.......E|NDIF....|
|00006310| 09 09 09 49 46 20 4e 4f | 54 20 5f 5f 6c 76 52 65 |...IF NO|T __lvRe|
|00006320| 73 75 6c 74 0d 0a 09 09 | 09 09 09 09 45 58 49 54 |sult....|....EXIT|
|00006330| 0d 0a 09 09 09 09 09 45 | 4e 44 49 46 0d 0a 09 09 |.......E|NDIF....|
|00006340| 09 09 45 4e 44 44 4f 0d | 0a 09 09 09 09 5f 5f 6c |..ENDDO.|.....__l|
|00006350| 63 44 6f 45 78 70 72 3d | 22 22 0d 0a 09 09 09 09 |cDoExpr=|""......|
|00006360| 5f 5f 6c 6c 44 6f 45 78 | 70 72 3d 2e 46 2e 0d 0a |__llDoEx|pr=.F...|
|00006370| 09 09 09 09 5f 5f 6c 6e | 44 6f 4c 69 6e 65 3d 30 |....__ln|DoLine=0|
|00006380| 0d 0a 09 09 09 09 44 49 | 4d 45 4e 53 49 4f 4e 20 |......DI|MENSION |
|00006390| 5f 5f 6c 61 44 6f 4c 69 | 6e 65 73 5b 31 5d 0d 0a |__laDoLi|nes[1]..|
|000063a0| 09 09 09 09 5f 5f 6c 61 | 44 6f 4c 69 6e 65 73 3d |....__la|DoLines=|
|000063b0| 2e 46 2e 0d 0a 09 09 09 | 09 5f 5f 6c 6e 44 6f 4c |.F......|.__lnDoL|
|000063c0| 69 6e 65 54 6f 74 61 6c | 3d 30 0d 0a 09 09 09 09 |ineTotal|=0......|
|000063d0| 4c 4f 4f 50 0d 0a 09 09 | 09 45 4e 44 49 46 0d 0a |LOOP....|.ENDIF..|
|000063e0| 09 09 43 41 53 45 20 5f | 5f 6c 63 43 6f 6d 6d 61 |..CASE _|_lcComma|
|000063f0| 6e 64 3d 3d 22 45 4e 44 | 46 22 0d 0a 09 09 09 5f |nd=="END|F"....._|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
